Plot[Sqrt[Sum[(k (i - 1))/(k - (i - 1))^2, {i, 2, k}]], {k, 1, 50}]