斜蹴、襲来

Haskellを勉強していこうと思います。

--euler #001 / recursion
let fizzbuzz a = (a `mod` 3 == 0) || (a `mod` 5 == 0)
putStrLn(show(sum(filter (fizzbuzz) [1..999])))

referring Problem 1 - Project Euler