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

Question

我的回答是：

如何在功能中声明打印？

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"