Как сделать массив целых в ADA - PullRequest
Новая
       26

Как сделать массив целых в ADA

1 голос
/ 22 апреля 2020

Я работаю над проектом в Аде, который просто составляет список. Однако, когда я пытаюсь добавить переменную в список, он говорит, что по какой-то причине ожидает строку. Вот мой код: 

with Ada.Text_IO; use Ada.Text_IO;

procedure hw6 is
    type i is range 0..99;
    type list is array (Integer range 0..99) of Integer;
    nums : list(0..99);

    procedure makeArray is
        num: Integer;
    begin
        Print_Line("Enter stuff");
        for index in 0..nums'Length loop
            num := Integer'Value(Ada.Text_IO.Get_Line);
            if num < 0 then
                exit;
            else 
                nums(index) := Integer'Value(num);
            end if;
        end loop;
    end makeArray;
begin
    makeArray;
end hw6;

Я получаю сообщение об ошибке 

hw6.adb:17:54: expected type "Standard.String"
hw6.adb:17:54: found type "Standard.Integer".

Любая помощь приветствуется.

...