Ada将项添加到数组中

Ada将项添加到数组中,ada,Ada,`你好,我正在做一个项目,我必须对一个文本文件进行排序,并找到一个字符出现的次数,我已经对它做了一切,但我不知道如何将每个字母出现的次数添加到一个数组中,以便我可以对其进行排序。我相信,一旦我能在数组通过计数器时将出现次数添加到数组中,我就能对其进行排序,但我不知道如何将这些项添加到数组中,有人能帮我吗 使用Ada.Strings.Maps; 使用Ada.Text_IO;使用Ada.text\u io; 使用Ada.Integer\u Text\u IO;使用Ada.Integer\u Tex

`你好,我正在做一个项目,我必须对一个文本文件进行排序,并找到一个字符出现的次数,我已经对它做了一切,但我不知道如何将每个字母出现的次数添加到一个数组中,以便我可以对其进行排序。我相信,一旦我能在数组通过计数器时将出现次数添加到数组中,我就能对其进行排序,但我不知道如何将这些项添加到数组中,有人能帮我吗

使用Ada.Strings.Maps; 使用Ada.Text_IO;使用Ada.text\u io; 使用Ada.Integer\u Text\u IO;使用Ada.Integer\u Text\u IO; 使用Ada.Float_Text_IO;使用Ada.Float_Text_IO;-这适用于百分比所需的浮点操作 - 程序测试是 计数器:整数的数组字符:=其他=>0;-将所有计数器初始化为0 类型Arr是整数的数组正范围; C:性格; 填充、输出文件:文件类型; 上限:自然; 低计数:自然; 特别帐户:自然; -Occ:阵列: 子类型lower是字符范围“a”..“z”;-小写字母 子类型上限是字符范围“A”..“Z”;-大写字母 -P:Arr:=计数器; 子类型非负浮动是浮动范围0.0。。最后漂浮; 总计:非负浮动; 总数2:自然; -计数器:数组_类型; -排序alg我尝试使用,但无法将计数器值放入数组,因此我可以在此处对其进行排序 程序排序A:输入输出Arr为 Min:阳性; 温度:整数; 开始 因为我在一个“第一..最后一个-1”循环中 Min:=I; 对于I+1..A'最后一个循环中的J 如果A Min>A J,则 Min:=J; 如果结束; 端环; 如果Min/=I,则 温度:=AI; A I:=一分钟; A最小值:=温度; 如果结束; 端环; 结束排序; 开始 上限:=0; 下限计数:=0; 特殊账户:=0; OpenInFile,在_文件中,.\src\Exam2data.txt; CreateOutFile,Out_文件,.\src\Maginsky.txt; 而不是文件填充循环的Ada.Text\u IO.End\u Ada.Text_IO.Getinfle,C; 如果C在下面,那么 Lowercount:=Lowercount+1; elsif C在上 上限:=上限+1; 其他的 特殊账户:=特殊账户+1; 如果结束; 计数器C:=计数器C+1;
端环 下面的程序收集字母的计数

使用Ada.Text_IO;使用Ada.Text\u Io; 主要程序是 子类型上限是字符范围“A”..“Z”; 子类型Lower是字符范围“a”..“z”; 上限计数:自然数组上限:=其他=>0; 较低计数:阵列自然功率:=其他=>0; 文件名:String1..1024; 长度:自然长度; 输入:String1..1024; _文件:文件类型; 开始 输入要读取的文件名:; Get_LineItem=>Filename,Last=>Length; OpenFile=>_文件, 模式=>在_文件中, Name=>Filename1..Length; -从文件中读取每个字符并对字母进行计数 而不是\u文件的\u结束\u文件循环 Get_LineFile=>The_文件,Item=>Input,Last=>Length; 对于1.长度循环中的I 如果输入在上部,则 Upper_CountInputI:=Upper_CountInputI+1; elsif InputI位于下方,然后 下_CountInputI:=下_CountInputI+1; 如果结束; 端环; 端环; 关闭_文件; -打印每个大写字母的计数 对于上计数范围循环中的I 放置“LineI”图像和“Upper\u CountI”图像; 端环; -打印每个小写字母的计数 对于低计数范围循环中的I 放置“LineI”图像和“Lower”CountI图像; 端环; 端干管; <>你需要考虑如何正确地对这两个数组进行排序。我建议您考虑将获取的数据转换成一个记录数组,如:

类型节点是记录 C:性格; N:天然; 结束记录; 类型计数为节点的数组1..52; 然后,您可以使用每个字母及其对应的计数填充计数数组,在node.N字段中对数组进行排序,然后打印显示字符及其计数的数组

编辑:显示整个程序,包括对结果进行排序

使用Ada.Text_IO;使用Ada.Text\u IO; 使用Ada.Containers.Generic_Array_Sort; 程序计数和排序为 类型节点是记录 C:性格; N:自然值:=0; 结束记录;
函数如果您在问题中提供代码而不是使用图像,则会更容易。而且,这会增加你得到答案的机会。请毫不犹豫地阅读有关格式设置的帮助。我将如何使用字母及其找到的计数填充计数数组?比如,如果发现了144次a,我将如何将该数据添加到计数数组中。请参见上面我编辑的答案。