Original

The series, 1^1 + 2^2 + 3^3 + … + 10^10 = 10405071317.

Find the last ten digits of the series, 1^1 + 2^2 + 3^3 + … + 1000^1000.

和訳

次の式は、1^1 + 2^2 + 3^3 + … + 10^10 = 10405071317 である。

では、1^1 + 2^2 + 3^3 + … + 1000^1000 の最後の10桁を求めよ

当てにならないソースコード(F#)

1
2
3
4
let problem48() =
    let addpow a b = a + b**(int b)
    ([|1I..1000I|] |> Array.reduce addpow) % 10000000000I
    |> (printfn "%A")

Problem 47 Index Problem 49