function - 我如何在 Haskell 中声明 putStrLn 或打印

Question

我的回答是：

如何在函数中声明 print？

bisiesto :: Int -> **?**;
bisiesto x = if (x `mod` 4 == 0 && ((x `mod` 100 /= 0) || (x `mod` 400 == 0))) then  print("Es bisiesto") else print("No es bisiesto");

请问，谁能帮帮我？谢谢。

Answer 1

这是一个简化版本（我改变了逻辑）：

bisiesto :: Int -> IO ()
bisiesto  n | even n = n : print "Es bisiesto"
            | otherwise = print "No es bisiesto"

像这样工作：

Prelude> bisiesto 2
"Es bisiesto"