fizzbuzz@Haskell

2007-05-18

「Fizz-Buzz問題」というのが話題になってるとのこと(どうしてプログラマに・・・プログラムが書けないのか?)。 練習がてらHaskellで書いてみた:

fizzbuzz :: Int -> String
fizzbuzz x
| x `mod` 15 == 0 = "FizzBuzz"
| x `mod` 3 == 0 = "Fizz"
| x `mod` 5 == 0 = "Buzz"
| otherwise = show x

main = do
putStr $ unlines $ map fizzbuzz [1..100]

結構悩んだ。 関数言語脳的にいけてるかな?