Дано натуральное число n( трехзначное ) составить программу которая вычисляет сумму цифр этого числа

210

491

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

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

MishaBig

Информатика

4,7(95 оценок)

Код на паскале: program proba; uses crt; var n,s: integer; begin writeln('введите натуральное число'); readln(n); s: =0; repeat s: =s+n mod 10; n: =n div 10; until n=0; writeln('сумма цифр ',s); end.p.s. программа вычисляет не только трехзначные числа ; )