Вывести на экран цифры заданного числа

Задача. Дано натуральное число N. Вывести на экран в столбец цифры данного числа

Воспользуемся циклом while с условием продолжения n не равно 0. Пока число n не равно 0, будем вычислять остаток от деления на 10,  и это будет цифра числа, будем уменьшать число n в 10 раз операцией div (деление нацело).

Программа решения на языке Паскаль

var n, d:integer;

begin

readln(n);

while n<>0 do

begin

d:=n mod 10;

println(d);

n:=n div 10;

end;

end.

Программа решения на языке Python

n = int(input('Введите число n = '))
while n!=0:
    d = n % 10
    print(d)
    n = n // 10

Результат запуска программы

Обратим внимание на то, что цифры выводятся в обратном порядке.