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

Например число 321: 3+2+1=6

Question

Информатика

Паллада

21 февраля, 02:24

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

Например число 321: 3+2+1=6

+5

Ответы (1)

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

Всеволодыч · Answer 1

Program summacifer;

var

sum, sot, des, ed, ch:integer;

begin

writeln ('введите трехзначное число') ;

readln (ch) ;

sot:=ch div 100;

ed: = ch mod 10;

des: = ch mod 100;

des: = des div 10;

sum:=sot+ed+des;

writeln ('сумма цифр вашего числа равна', sum) ;

end.

Дано трёхзначное число. Найти сумму его чисел.Например число 321: 3+2+1=6

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

Например число 321: 3+2+1=6