Project Euler, Problem 99, Mathematica brute force