Ответы на вопрос:
2)program sumcifr; var n: longint; k,s: integer; j: integer; begin s: =0; j: =0; write('вв число > '); readln(n); k: =n; while n> 0 do begin j: =j+1; s: =s+n mod 10; writeln( n mod 10); n: =n div 10; end; writeln('сумма цифр числа= ',s); readln; end.
Популярно: Информатика
-
sasavotchel27.12.2021 23:45
-
volkovaar200008.04.2021 23:32
-
viktoriyayudin08.09.2021 03:09
-
Pomogiteπ26.05.2021 22:56
-
fghjik18.12.2020 03:38
-
igvolume1129.04.2020 11:00
-
Aigerim80030.09.2022 15:14
-
Bogalexx26.03.2022 06:31
-
Azhar160507.05.2020 05:00
-
096725225009.04.2020 04:07