3 значное число нужно сложить числа в этом числе паскаль

Question

Информатика

Ксена

25 апреля, 22:26

3 значное число нужно сложить числа в этом числе паскаль

+1

Ответы (1)

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

Кетевань · Answer 1

Program dig3;

var

n, a, b, c: integer;

begin

write ('Число: ') ;

readln (n) ;

a : = n div 100;

b : = n mod 100 div 10;

c : = n mod 10;

writeln (a + b + c) ;

end.