Прокопий
4 год назад
Напишите, пожалуйста, программу, которая выводит на экран цифры натурального числа, каждую на новой строчке(Используя цикл с заданным условием окончания работы).
ОТВЕТЫ
Евгений
Oct 24, 2020
program z1;
var a: integer;
begin
write ('a = ');
readln(a);
repeat
writeln (a mod 10);
a:=a div 10
until a = 0
end.
307
Смежные вопросы: