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

akhmedkhatataev95 akhmedkhatataev95    3   23.08.2019 06:30    0

Ответы
mrgrabik mrgrabik  05.10.2020 14:03
Program n1;
var i: integer;
sum: real;
begin
sum:=0;
for i:=1 to 100 do sum:=sum+i*i;
writeln(sum);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика