Вычислить:(1+2 i)*(2-i)+(3-2 i)*(2-3 i)

program fagasg;var g,h: Real;i: integer;beging:=3;h:=3;For i:=2 to 10 do begin  g:=g+i+1;  h:=g*h;  end;Writeln(h);end.