Problem 50 http://projecteuler.net/index.php?section=problems&id=50 2から始まる系列、3から始まる系列、をリストにして、長いものから調べていく。遅い。 import Data.Array sieve a p | a!p == True = sieve (a // [ (m, False) | m <- b, a!m ]) (p +…

Problem 86 蜘蛛Sが直方体で大きさが6×5×3の部屋の一つの角に座っており、蝿Fが反対側の角に座っている。部屋の表面を進んでSからFの最短の「直線」距離は10（中略）。 どの与えられた直方体にも「最短」経路候補が3つまであり、その最短ルートはいつも整数…