如何在ADA中读取/操作输入？

从标准输入中读取，我希望能够像这样插入几组整数，并对每2个整数进行一些数学运算

即：

“您好，请输入一些数字以获取其总和”：

19

2 10[输入]

输出：

1+9=10

2+10=12

我已经成功了，只有用户能够像我刚才那样只输入2个整数

get(numOne);
get(numTwo);

然后是这样的：

 answer := numOne + numTwo;
 put_line(answer'img); 

---

但是我是ADA的新手，不知道如何扫描我在示例中使用的所有四个整数，只对前两个进行求和，然后对后两个进行求和，如果有更多的整数，则继续对它们求和。基本上，程序首先扫描所有用户输入，并对每两个整数进行运算，然后将它们连接到一个结果字符串，我们可以在最后打印出来。我知道怎么做，我只是对这门语言不熟悉，不知道如何把它写进代码中。请询问您是否需要更多信息。感谢所有的帮助

只需围绕现有逻辑进行循环即可。-请注意，Ada有很好的“无限”循环。：-）

你是说你想要一个环？艾达确实有一些。检查一下。你不理解这个问题，我想消除get（）函数中的变量，这样用户就可以输入任意数量的偶数而不是固定数量的整数，并且程序可以每两个整数相加一次，并将结果存储到一个长字符串中，最后可以打印出来。不，我们不理解这个问题。也许您可以以至少可编译的程序的形式发布一些实际代码，告诉我们输入应该是什么（您的示例在两行上，但只有第二行后面有[Enter]-？）和相应的输出（它应该打印两个求和的值吗？），并解释为什么不能在循环中一次读取一对输入，然后在运行时打印结果。当然，您可以使用Ada.Text\u IO.unbounded\u IO将结果附加到一个无界字符串，并在最后输出该结果。