Ada -布尔数组

Question

我想对这张照片进行编码

​

终点站应显示如下：

对于DS2：

键入您的数据：viDIn fJFN1 r1f29 M6YFu LDuWG fxFQ6 FkaSL JCGiq niVGg wLAUK

-以粗体显示的数据中的用户类型

您的数据: viDIn fJFN1 r1f29 M6YFu LDuWG fxFQ6 FkaSL JCGiq niVGg wLAUK

所以我很难用布尔表达式。

这是我的方法

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

procedure Array is
   
   type Array_Inner_Type is
      array (5..9) of String(1..5);
     
   type Boolean_Type is 
      array (False..True) of Array_Inner_Type;
   
   MyArray : Boolean_Type;

   procedure Get(MyArray : out Boolean_Type) is 
   begin
      for I in True..False loop
         Get(MyArray(I));
      end loop;
   end Get;
    
end Array;

一旦我在我的终端没有错误，我相信我可以解决这个问题，但到目前为止，我得到的错误，这是由于我的for循环。任何帮助都是非常感谢的！

Answer 1

我不知道这些字符串是什么意思，但我很想把它当作

subtype Word is String (1 .. 5);

type Funny_Map is array (Boolean, 5 .. 9) of Word;

Map : Funny_Map;