数组上的Haskell打印映射
我正在练习一个问题，在stdin上输入文本，在stdout上输出。 在我读到的第一行中，他们给出一个整数T，然后是T行。对于下面的T行，我有一个函数，它接受一个整数并返回一个我必须打印的整数。所以我的输出应该是T行。 我被困在这一点上：数组上的Haskell打印映射,haskell,printing,map,Haskell,Printing,Map,我正在练习一个问题，在stdin上输入文本，在stdout上输出。 在我读到的第一行中，他们给出一个整数T，然后是T行。对于下面的T行，我有一个函数，它接受一个整数并返回一个我必须打印的整数。所以我的输出应该是T行。 我被困在这一点上： main = do strcases <- getLine map (calculate) [1..(read strcases)] calculate _ = do strp <- getLine print $
main = do
strcases <- getLine
map (calculate) [1..(read strcases)]
calculate _ = do
strp <- getLine
print $ addone (read strp)
addone x = x+1
main=do
strcases您可以使用readLn
，它结合了getLine
和read
，以及Control.Monad
中的replicateM\uuuu
来重复IO
操作（或任何Monad）给定次数：
import Control.Monad
main :: IO ()
main = do
n <- readLn
replicateM_ n calculate
calculate :: IO ()
calculate = do
x <- readLn
print $ addone x
addone :: Int -> Int
addone x = x+1
import-Control.Monad
main:：IO（）
main=do
n您想要mapM\uu
。这是一元映射函数。顺便说一句，您只需编写mapM\uuuCalculate[1..read strcases]
：不需要任何括号！而且print$read strp+1
也可以。但是，在这两种情况下，我都建议不要使用read
，最好使用readLn
直接获得正确的类型。（无论是read
还是readLn
都有点不安全，它们并不能很好地处理解析失败……但我认为这对应用程序来说并不是一个真正的问题。）此外，由于您放弃了calculate
的参数，因此您可以使用replicateM（read strcases）calculate
，而不是mapM_calculate[1..（读取小写字母）]
，并消除计算
参数。