首先有一个整数(t)表示测试用例的数量。然后是 2*t 行。在每一行中都有一个整数。我们必须输出每两个数字的总和。
样本输入:
3
1
2
3
4
5
6
样本输出:
3
7
11
首先有一个整数(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自动导入的。
您还需要阅读解释 do 表示法的教程的一部分:它看起来与命令式语言中的指令列表相同,但略有不同。