Get

(Enteros)

Librería

Ada.Text_IO / Integer_IO

Ada.Text_IO / Modular_IO

Ada.Integer_Text_IO

Sintaxis y explicación

procedure Get([File : in File_Type;]
              Item  : out Num;
              Width : in Field := 0);

Ejemplo

with Ada.Integer_Text_IO; use Ada.Integer_Text_IO;
with Text_IO;             use Text_IO;
...
A : Integer := 255;
F : File_Type;
...
Get (A);    --  Lee un valor Integer en la variable A
Get (F, A); --  Lee un valor Integer del fichero F en la variable A
Get (A, 5); --  Lee un valor Integer en la variable A.
            --  Se toman exactamente 5 caracteres de la entrada
...

Véase