Дано трехзначное число. напишиье программу которая суммирует разряды числа
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
Оцени ответ
Вход
Регистрация
Задать вопрос
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