haskell - Haskell 中的 fizzbuzz ？

Question

我正在尝试使用列表理解在 haskell 中编写“fizzbuzz”。

为什么以下不起作用，应该如何？

[ if x `mod` 5 == 0 then "BUZZFIZZ"
  if x `mod` 3 == 0 then "BUZZ" 
  if x `mod` 4 == 0 then "FIZZ" | x <- [1..20], 
    x `mod` 3 == 0, 
    x `mod` 4 == 0, 
    x `mod` 5 == 0 ]

Answer 1

这不是有效的 Haskell。 else 分支在 if ... then ... else 中不是可选的。这似乎是使用 case 语句的好机会，而不是使用 if。

case (x `rem` 3, x `rem` 5) of
  (0,0) -> "fizzbuzz"
  (0,_) -> "fizz"
  (_,0) -> "buzz"
  _     -> show x

此片段适用于传统的“fizzbuzz”；您的代码似乎略有不同。