Составить программу, вычисляющую сумму квадратов всех чисел от 1 до 100. (в pascal)

korzhik559 korzhik559    2   07.03.2019 14:20    0

Ответы
bitievru2014 bitievru2014  24.05.2020 03:22

var
i: integer;
s: real;

begin
s := 0;
for i := 1 to 100 do
s := s + i * i;
writeln(s:7:0);
end.

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

Популярные вопросы