Вася подсчитал сумму цифр натурального числа n , а затем сумму цифр у полученной суммы цифр. какое число он получил? входные данные вводится одно натуральное число n , меньшее 10 000 . выходные данные выведите одно натуральное число — ответ в . нужно сделать на pascal abc
123
476
Ответы на вопрос:
Var n,s: integer; begin readln(n); s: =0; while n> 0 do begin s: =s+n mod 10; n: =n div 10; end; writeln(s div 10 + s mod 10); end. пример: 4093 7
Информация - это знание человека, которые он получает от всего окружающего мира, которые он исполняет с вычислительной техники.
Популярно: Информатика
-
igubaevak06.04.2022 11:55
-
valeriyait08.09.2020 13:48
-
Nadin1821.01.2022 09:06
-
jgfygbyt04.03.2022 11:04
-
uspenza06.07.2021 10:13
-
kril2010117.01.2021 20:44
-
ivanural08.02.2020 06:10
-
dima20075631.01.2023 06:42
-
Лессикаа26.04.2020 10:56
-
Ludmila2804198516.04.2022 16:33