Пользователь вводит трехзначное число, надо вычислить сумму чисел этого числа.

Question

Информатика

Геласия

9 июля, 12:31

Пользователь вводит трехзначное число, надо вычислить сумму чисел этого числа.

+2

Ответы (1)

Знаешь ответ?

Андрюня · Answer 1

Var x, a, b, c:integer;

begin

write ('Введите число: '); read (x);

a:=x div 100;

b:=x div 10 mod 10;

c:=x mod 10;

writeln ('сумма цифр: ', a+b+c);

end.