Entrada y salida de valores enteros

Explicación

Sintaxis

generic
   type Num is range <>;
package Integer_IO is...
generic
   type Num is mod <>;
package Modular_IO is...

Ejemplo

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

procedure prueba is
   type Entero_Corto is range -256 .. 255;--  Entero con signo (de -256 a 255)
   type Mod_Byte     is mod 256;          --  Entero modular (con módulo 256, 
                                          --  valores de 0 a 255)

   package Entero_Corto_IO is new Integer_IO (Entero_Corto);
   package Mod_Byte_IO     is new Modular_IO (Mod_Byte);
   use Entero_Corto_IO, Mod_Byte_IO;
...

Operaciones