package GAda.Integer_Text_IO is -- Lit et retourne un entier function FGet return Integer ; -- Affiche un entier procedure Put (Aff : in Integer) ; -- Lit un entier (version originale) procedure Get (Item : out Integer) ; end GAda.Integer_Text_IO ;