Переменная Х содержит трехзначное целое число. подсчитать сумму цифр этого числа

Question

Информатика

Милана

4 мая, 22:30

Переменная Х содержит трехзначное целое число. подсчитать сумму цифр этого числа

+4

Ответы (1)

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

Киля · Answer 1

Program abc;

var x, a, b, c: integer;

begin

writeln ('vvedite chislo') ;

readln (x) ;

a:=x div 100;

b:=x mod 100 div 10;

c:=x mod 10;

writeln (a+b+c) ;

end.