Дано трехзначное число. напишиье программу которая суммирует разряды числа

Question

Дано трехзначное число. напишиье программу которая суммирует разряды числа

Answer 1

Var n,s:integer;
begin
write('n='); readln(n);
s:=(n div 100)+(n div 10 mod 10)+(n mod 10);
writeln ('s=',s);
end.

Пример:
n=123
s=6

Comments

огромное спасибо

---

Пожалуйста