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

Question

Информатика

Раида

22 августа, 02:36

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

+3

Ответы (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.