Question

дано трёхзначное число 527 найти сумму цифр в числе( Паскаль) ​

Answer 1

Ответ:

var

 sum:real;

 n:integer;

begin

 n:=527;

 sum:=(n div 100)+((n div 10) mod 10)+(n mod 10);

 writeln('Сумма чисел в числе равна: ',sum);

 writeln;

 readln;

end.