Entrada/salida.
Las funciones básicas de entrada/salida
son:
get(X), put(X) para X de tipo character,
string, integer o float
get_line(S,L), put_line(S) para S de tipo
string. L es la longitud leída. Leen o escriben una string en una
línea y pasan a la siguiente.
new_line, que, cuando se está escribiendo,
inicia una nueva línea.
skip_line, que, cuando se está
leyendo, desestima el resto de la línea actual.
Para realizar entrada/salida de ristras o
caracteres basta con incluir la cláusula de contexto "with Text_IO;".
Para realizar entrada/salida de otros tipos escalares hay que hacer, además,
una declaración, en la sección de declaraciones
del procedimiento, que especifica la aplicación de un paquete
genérico de entrada/salida adecuado sobre el tipo en cuestión
(a esto se llama crear una instancia del paquete), tal como se muestra
en los siguientes ejemplos:
package Día_IO is new
Enumeration_IO(Día); --Enumeration_IO sirve para tipos enumerados
package MiEntero_IO is new Integer_IO(MiEntero);--Integer_IO
sirve para enteros con signo
package rf_IO is new Float_IO(rf);
--Float_IO sirve para reales en coma flotante
package rfija1_IO is new Fixed_IO(rfija1);--Fixed_IO
sirve para reales en coma fija ordinarios
package rfija2_IO is new Decimal_IO(rfija1);--Decimal_IO
sirve para reales en coma fija decimales
package Natural_IO is new Modular_IO(Natural);--Modular_IO
sirve para enteros sin signo
En cualquier caso, hay que utilizar la
cláusula "with Text_IO;", puesto que estos paquetes de entrada/salida
(Enumeration_IO, Integer_IO, Float_IO, ...), se encuentran incluidos en
la librería "Text_IO".
[Anterior] [Inicio]
[Siguiente]