Hola soy novato en este lenguaje y necesito saber como crear un array de String, insertarle datos y mostrarlo, lo de crearlo e insertarlo e usado código de una función de un programa muy largo que encontré y que funcionaba y lo e adaptado pero no me funciona jaja dejo aquí el código para ver si alguien puede corregidme. Gracias
Código ":
Ver originalwith Ada.Text_IO; use Ada.Text_IO;
with Ada.Integer_Text_IO; use Ada.Integer_Text_IO;
procedure Tester is
package IO renames Ada.Text_IO;
instruccion : String(1..4);
instruccion(1..4) := "ADDI";
begin
IO.Put_Line(instruccion);
end Tester;
--Otra que e encontrado es la siguiente:
with Ada.Text_IO;
with Text_IO, Ada.Strings.Fixed,
Ada.Strings.Bounded, Ada.Strings.Unbounded;
use Text_IO, Ada.Strings.Fixed, Ada.Strings.Unbounded;
procedure Tester is
package IO renames Ada.Text_IO;
subtype tNombreFuncion is string (1 .. 5);
nombreFuncion : tNombreFuncion;
nombreFuncion := "ADDI";
begin
IO.Put_Line(nombreFuncion);
end Tester;