Хелп(( не шарю вообще. тема - циклы 1) написать программу вычисления суммы: s=1*2*3+2*3*4+3*4*5++21*22*23

Var i,s:integer;
begin
s:=0;
for i:=1 to 21 do s:=s+i*(i+1)*(i+2);writeln('s = ',s);
end.

Результат:
s = 63756