Fizz-Buzz問題
どうしてプログラマに・・・プログラムが書けないのか?の例題をHaskellでやってみました。すでに誰かやってる人いそうですが。んー、久しぶりにHaskell使ったら結構忘れてました。
main = mapM_ putStrLn $ map f [1 .. 100] where f i | (i `mod` 15) == 0 = "FizzBuzz" | (i `mod` 3) == 0 = "Fizz" | (i `mod` 5) == 0 = "Buzz" | otherwise = show i