Регистрация
mazurok3
09.02.2020 20:37
Информатика
Есть ответ 👍

Напишите программу,которая считает сумму цифр введенного числа(паскаль)

276
281
Посмотреть ответы 2

Ответы на вопрос:

kazachok2
kazachok2
4,8(6 оценок)
Var n,sum: integer; begin writeln('vvedite chuslo'); readln(n); repeat sum: =sum+(n mod 10); n: =n div 10; until n=0; writeln('summa=',sum); end.
Foxer20024
Foxer20024
4,6(81 оценок)
Var a: longint; begin read(a); writeln(a*8388608); end.

Популярно: Информатика