首先是一个整数(t),表示测试用例的数量 . 然后是2 * t行 . 在每一行中都有一个整数 . 我们必须输出每两个数字的总和 .
样本输入:
3 1 2 3 4 5 6
样本输出:
3 7 11
import Control.Monad (replicateM) main :: IO () main = mapM_ print . map (uncurry (+)) =<< flip replicateM readIntPair =<< readLn readIntPair :: IO (Integer, Integer) readIntPair = do x <- readLn y <- readLn return (x, y)
replicateM 来自Control.Monad,其他功能从Prelude自动导入 .
replicateM
您还需要阅读解释符号的教程的一部分:它看起来与命令式语言中的指令列表相同,但略有不同 .
1 回答
replicateM
来自Control.Monad,其他功能从Prelude自动导入 .您还需要阅读解释符号的教程的一部分:它看起来与命令式语言中的指令列表相同,但略有不同 .