Project Euler

なんか Project Euler をやれといわれたのでやってみたんだけども、若い番号の問題がやたら簡単でびっくりした。
例えば Problem 5 とか Gauche なら

(use srfi-1)
(apply lcm (iota 20 1))

で、Haskell なら

foldl1 lcm [1..20]

んで、もって Problem 160 とか解き方が良く分からなかったから、Hadoop を使ってぶん回して解いた*1。ひどい。Quad Core とか Dual Core x 2 とかそういうマシンを複数台使って 90 分とかだったから、普通にやると多分1日以上かかるだろうなぁ。
とりあえず、今 49 問 解いてて 27% genius.

*1:といっても(10^12)! をまじめに計算したりはしていない