Начальный паскаль! решите : 1. вводится двузначное число. вывести на экран цифры этого числа. (использовать div и mod)

Var n:integer;
begin
write('n = ');
readln(n);
writeln('цифры числа:');
writeln(n div 10);
writeln(n mod 10);
end.

Пример:
n = 38
цифры числа:
3
8