2009-05-23から1日間の記事一覧
http://projecteuler.net/index.php?section=problems&id=5 1から20全てで割り切れる最小の数 --時間かかりすぎ main = print $ head $ filter (isCommonMultiples [1..20]) [21..] isCommonMultiples :: [Int] -> Int -> Bool isCommonMultiples [] _ = Tru…
http://projecteuler.net/index.php?section=problems&id=5 1から20全てで割り切れる最小の数 --時間かかりすぎ main = print $ head $ filter (isCommonMultiples [1..20]) [21..] isCommonMultiples :: [Int] -> Int -> Bool isCommonMultiples [] _ = Tru…