ProjectEuler #7