vin / challenge

Python challenge and project euler

This URL has Read+Write access

challenge / euler / euler030.hs
100644 5 lines (3 sloc) 0.144 kb
raw blame history 
1
2
3
4
5

sumFifths 0 = 0
sumFifths n = (mod n 10)^5 + sumFifths (div n 10)
 
main = print . sum . take 6 . tail . filter (\n -> n == sumFifths n) $ [1..]