Sum[Floor[Sqrt[1000/Prime[n]]],{n,1,168}]