Отыскать сумму квадратов естественных чисел от 2 до 5 с шагом

program zz1;

var n, i:integer; // задаем переменные целого типа

begin

for i:=2 to 5 do // организуем цикл, в котором переберем числа от 2-ух до пяти

begin

n:=n + i * i; // возводим еще одно число в квадрат, умножив на себя, и прибавляем его в сумму

end;

write( сумма квадратов естественных чисел от 2 до 5 с шагом 1 = , n); // выводим ответ

end.