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

холера663 холера663    2   05.09.2021 18:50    0

Ответы
StacyZviozdohkina StacyZviozdohkina  05.09.2021 19:00

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.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика