Вычислить сумму — 1+2/3*x+3/4*х^2+4/5*х^3+…+11/12*х^10 при х=2 — Pascal(Паскаль)

Uses
  CRT;

Var
  i, x: integer;
  sum: real;

begin
  sum := 1;
  x := 2;
  for i := 2 to 11 do
    sum := sum + (i / ((i + 1) * exp((i - 1) * ln(x))));
  write(sum);

end.