Создать программу на Паскаль , определяющую все цифры четырехзначного числа.

АннаПетух АннаПетух    2   23.02.2020 13:16    9

Ответы
Ліка2006 Ліка2006  11.10.2020 11:34

var

 n:integer;

begin

 read(n);

 write( n div 1000 mod 10 ,' ', n div 100 mod 10, ' ', n div 10 mod 10 , ' ', n mod 10);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика