Как можно решить 9 задание в ОГЭ другим способом?Вот Задание:Var s, n: integer;Begins := 2;For n := 2 to 5 dos := s + n*2;Writeln(s);End.Как то можно что-то в степень возвести, а что?? Чтоб долго таблицу не писать

1) s=2    n=2  s:=2+4=6
2) s=6    n=3  s:=6+6=12
3) s=12  n=4  s=12+8=20
4) s=20  n=5  s=20+10=30

При каждом шаге будем получать
6_12_20_30...
Видим закономерность
2*3_3*4_4*5_5*6...


Var
s,s1,n: integer;
Begin

writeln('Старый код');
s := 2;
For n := 2 to 5 do
begin 
Write('s= ',s); 
s := s + n*2; 
Write('  n= ',n); 
Writeln('  s= ',s);
end;


writeln;
writeln('Новый код');
for n:=2 to 5 do 
begin   
s:=n*(n+1);   
write('n= ',n);   
writeln('  s= ',s); 
end;
End.