with Ada.Integer_Text_Io; use Ada.Integer_Text_Io;
procedure visu_array is
type numeros is array(1..10) of integer;
num:constant numeros:=(0,1,2,3,4,5,6,7,8,9); -- Esto son numeros interpretados como integers.
begin
-- Para visualizarlos, haremos un simple for.
For I in 1..10 loop
put(num(I),2); -- El ( ,2) es para disminuir los espacios que deja en la visualización.
end loop;
end visu_array;