Регистрация
Войти
Стать экспертом Правила
Информатика

Напишите программу, которая печатает все цифры заданного числа по одной в каждой строке начиная с последней цифры. в качестве входных данных допускается ваодить чтсла от 0 до 2 000 000 000

ОТВЕТЫ
Var
    n: longint;
begin
    readln(n);
    while n gt; 0 do
    begin
        writeln(n mod 10);
        n := n div 10;
    end;
end.
111
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам