Ответы на тесты, общий решебник

Дано натуральное число N. Вычислить сумму цифр этого числа.

спросил от в категории Образование

1 Ответ

var n,s:integer;Begin  read(n);  while n>0 do begin    s:=s+n mod 10;    n:=n div 10;  end;  writeln(s);End.
ответил от