2007-05-09 FizzBuzz問題 Haskell cf. どうしてプログラマに・・・プログラムが書けないのか? via 404 Blog Not Found - ブクマゴルフってどうよ? なんか昨日からあちこちで見かけるので書いてみた。久しぶりの Haslellで。 あと,増田で剰余は使うな,と言ってるから使わない。 fizz = cycle ["","","Fizz"] buzz = cycle ["","","","","Buzz"] f "" n = show n f s _ = s main = mapM_ putStrLn $ zipWith f (zipWith (++) fizz buzz) [1..100] あなごるじゃないから短くするのはやらない。