Floor[10^15 * Sum[1/k^3, {k, 1, Ceiling[((2*10^15)/2)^(1/2)]}] + 0.5] * 10^-15