Гавриил
6 год назад
Посчитать сумму квадратов первых 10 чисел.(на паскале ришить)
ОТВЕТЫ
Измарагд
Jul 21, 2019
Var sum,i:integer;
begin
for i:=1 to 10 do
sum:=sum+i*i;
writeln(sum);
end.
begin
for i:=1 to 10 do
sum:=sum+i*i;
writeln(sum);
end.
207
