kusano_k kusanoさん@がんばらない
HaskellでFizzBuzz。
main=putStrLn$unlines$map(\x->[show x,"Fizz","Buzz","FizzBuzz"]!!([3,0,0,1,0,2,1,0,0,1,2,0,1,0,0]!!mod x 15))[1..100]
main=putStrLn$unlines$map(\x->[show x,"Fizz","Buzz","FizzBuzz"]!!([3,0,0,1,0,2,1,0,0,1,2,0,1,0,0]!!mod x 15))[1..100]
