Mnedor 23 октября 2019 в 10:07
13 БАЛЛОВ, сделать на паскале
Трехзначное введенное число распечатать вертикально
13 БАЛЛОВ, сделать на паскале
Трехзначное введенное число распечатать вертикально
Var n,m,k:Integer;
begin
Readln(n);
Writeln(n mod 10);
m:=n div 10;
Writeln(m mod 10);
Writeln(n div 100);
end.
begin
Readln(n);
Writeln(n mod 10);
m:=n div 10;
Writeln(m mod 10);
Writeln(n div 100);
end.
Компьютеры и вычисления
23
38
Для комментирования необходимо зарегистрироваться на сайте