Desafio 20 do project euler