2009-05-14から1日間の記事一覧
http://projecteuler.net/index.php?section=problems&id=2400万を超えない範囲のフィボナッチ数列で値が偶数である項の総和。 main = print $ foldl (+) 0 $ evenNumbers $ fib 1 2 evenNumbers :: [Int] -> [Int] evenNumbers xs = [x | x <- xs, x `mod` …
http://projecteuler.net/index.php?section=problems&id=2400万を超えない範囲のフィボナッチ数列で値が偶数である項の総和。 main = print $ foldl (+) 0 $ evenNumbers $ fib 1 2 evenNumbers :: [Int] -> [Int] evenNumbers xs = [x | x <- xs, x `mod` …