( Pascal ABC.net )
Составьте программу:
Дано 5-ти значное число (78906)
с помощью div и mod
нужно выделить цифры из числа.

Var
    k: integer;

begin
    read(k);
    while(k > 0) do
    begin
        writeln(k mod 10);
        k := k div 10;
    end;
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.