-6

首先有一个整数(t)表示测试用例的数量。然后是 2*t 行。在每一行中都有一个整数。我们必须输出每两个数字的总和。

样本输入:

3
1
2
3
4
5
6

样本输出:

3
7
11 
4

1 回答 1

0
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 表示法的教程的一部分:它看起来与命令式语言中的指令列表相同,但略有不同。

于 2013-03-14T11:33:50.680 回答