Найти сумму квадратов всех чисел от 11 до 55

Question

Найти сумму квадратов всех чисел от 11 до 55

Answer 1

Var n,i:integer;
begin
for i:=11 to 55 do
  n:=n+i*i;
writeln(n)
end.