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

Question

Информатика

Степаха

11 июля, 07:56

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

+2

Ответы (1)

Знаете ответ на вопрос?

Викула · 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