Question

С помощью цикла for вычислите значение такого выражения :
1*2+2*3+3*4+........+36*37

Answer 1

var s,i:longint;

begin

s:=0;

For i:=1 to 36 do

s+=i*(i+1);

Write(s);

end.