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)

Something in the past
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)