Найти сумму квадратов всех натуральных чисел от 1 до 100

ndan1k ndan1k    2   19.07.2019 10:00    3

Ответы
Police222 Police222  03.10.2020 07:48
Var i,n : Integer;
Begin
  n:=0;
  For i:=1 to 100 do n:=n+sqr(i);
  Writeln(n);
end.

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