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

Пажинский
Jul 2, 2019
Var
n: longint;
begin
readln(n);
while n gt; 0 do
begin
writeln(n mod 10);
n := n div 10;
end;
end.
n: longint;
begin
readln(n);
while n gt; 0 do
begin
writeln(n mod 10);
n := n div 10;
end;
end.
111
Смежные вопросы: