Andromaath
5 год назад
напишите программу, которая печатает все цифры заданного числа по одной в каждой строке начиная с последней цифры. в качестве входных данных допускается ваодить чтсла от 0 до 2 000 000 000
ОТВЕТЫ
Григорий
Oct 24, 2020
var
n: longint;
begin
readln(n);
while n > 0 do
begin
writeln(n mod 10);
n := n div 10;
end;
end.
n: longint;
begin
readln(n);
while n > 0 do
begin
writeln(n mod 10);
n := n div 10;
end;
end.
168
Смежные вопросы:
