Ответы на вопрос:
Var n,k: integer; begin write('n='); readln(n); while n< > 0 do begin writeln(n mod 10); n: =n div 10; end; end. пример: n=12756 6 5 7 2 1
Популярно: Информатика
-
SattorovaSonya14.05.2022 19:40
-
keklol199031.08.2022 14:41
-
veroni4kaa08.12.2022 14:30
-
niga12309813.03.2020 13:36
-
ViktorNi19.09.2021 12:30
-
ПолинаТ113.09.2020 22:51
-
pinGvin02217.03.2023 17:29
-
razdor1996Rqzdor22.07.2021 05:46
-
СтаниславСуглобов17.04.2023 19:22
-
portal123419.01.2022 13:17