Ответы на вопрос:
Program asd; var i,n: integer; begin read(n); while n> 0 do begin i: =i + n mod 10; n: =n div 10; end; write(i); end.
Популярно: Информатика
-
influenceee06.07.2021 00:12
-
delfin410.03.2020 16:45
-
alexksyx14.04.2022 22:29
-
Vasermann31.10.2021 18:21
-
korzhek0519.07.2020 16:50
-
Saharok0071108.01.2023 16:00
-
listova14.01.2021 06:11
-
anyaternovskay05.06.2021 20:48
-
Bogataer130.11.2022 05:47
-
Топор22817.03.2022 17:09