Question

Дано трехзначное число. Найдите сумму его цифр.


Входные данные

Вводится трехзначное число.
Input Result
179 17
829 19

Answer 1

Ответ:

program qq;

var

i,b: integer;

begin

read(i);

b:= (i div 100) + (i div 10 mod 10) + (i mod 10);

write(b);

end.