Вычслить сумму значений функции y=x2 на отрезке [1,5] с шагом 1.

y(1)=1
y(2)=2²=4
y(3)=3²=9
y(4)=4²=16
y(5)=5²=25
∑=1+4+9+16+25=55
Сумма значений 55

вот алгоритм с объявленными переменными
var
 sum, x: integer;

sum:=0;
for x:=1 to 5 do 
  sum:=sum+x*x;