Сколько слагаемых должно быть в сумме 1/3+4/6+9/11++kn2/kn2+2, чтобы сумма была больше составьте программу!

Var n,k: integer;
    s: real;
begin
  s:=0; n:=0;
  repeat
    inc(n);
    k:=n*n;
    s:=s+k/(k+2);
  until s>9;
  writeln('n = ',n,'   s =',s:5:2);
end.

n = 11   s = 9.45