Для !
,
задано натуральное число n. заменим это число суммой квадратов его цифр. какое число получается в результате это операции?
огромное за !

nika55551 nika55551    3   17.10.2019 11:05    4

Ответы
maxim210204 maxim210204  10.10.2020 07:36

var

  s,n,m :integer;

begin

write('введите натуральное число: ');

readln(n);

s:= 0;

repeat

  m:= n mod 10;

  s:= s + m*m;

  n:= n div 10;

until n = 0;

writeln('сумма квадратов цифр: ',s);

end.

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