Arrays Ada如何从用户处获取整数列表并将其放入数组中

Arrays Ada如何从用户处获取整数列表并将其放入数组中,arrays,input,ada,Arrays,Input,Ada,我很抱歉问这个问题,但是Ada对输入输出系统的要求非常严格,所以我不知道如何从用户那里获取输入并将其放入数组中 with Ada.Text_IO; use Ada.Text_IO; with Ada.Integer_Text_IO; use Ada; procedure Main is type MY_ARRAY is array(1..9) of INTEGER; Data : MY_ARRAY; begin Put("Please input the seri

我很抱歉问这个问题,但是Ada对输入输出系统的要求非常严格,所以我不知道如何从用户那里获取输入并将其放入数组中

with Ada.Text_IO;
use Ada.Text_IO;
with Ada.Integer_Text_IO;
use Ada;

procedure Main is
 type MY_ARRAY is array(1..9) of INTEGER;
   Data        : MY_ARRAY;

begin
   Put("Please input the series of numbers");
   Get_Line(Data);
end Main;

我知道这是完全错误的,但我到处都在研究,我找不到人们是如何获得数组LOL的输入的。谢谢yall的帮助。

我认为只使用Ada.Text\u IO包更容易,这样你就可以将每个数字读作字符串,然后使用for循环和
integer'值将其逐个存储为整数,它将字符串转换为整数

with Ada.Text_IO;
use Ada.Text_IO;

procedure Main is
    type MY_ARRAY is array(1..9) of Integer;
    Data : MY_ARRAY;

begin
    Put_Line("Please input the series of numbers");

    for I in 1..MY_ARRAY'Length loop
        Data(I) := Integer'Value(Get_Line);
    end loop;
end Main;

也可以考虑。那个链接看起来就像处理字符串tho。Ada是否有任何获取数组输入的方法?谢谢你的帮助。任务可能是将单个数字放入数组的组件中吗?或者,为了找到一种从字符串中提取单个数字的方法?你可能想考虑使用一个循环来读取值并把它们放在你的数组中。要明确,艾达标准库不提供任何从标准输入或文件中读取任何类型对象的数组。(当然,除了
字符
,以
字符串
s的形式)。您必须对循环进行编码,并且(在最简单的情况下,不进行任何错误检查)对
数据
的每个元素依次使用
Ada.Integer\u Text\u IO.Get