Project Euler – 問題48

1^1 + 2^2 + 3^3 + … + 10^10 = 10405071317である。

1^1 + 2^2 + 3^3 + … + 1000^1000の下10桁と求めよ。

そのまま計算可能である。

euler048 = sum [i ^ i | i <- [1..1000]] `mod` (10 ^ 10)