ADA - Leer .txt

Tengo que hacer una practica y no consigo encontrar un codigo para poder leer un documento .txt. Ayuda

Hola,
para leer de un archivo usa las llamadas "Open", "Close", "Create", etc...
del paquete Ada.Text_IO
Por ejemplo:
- open (Fichero, IN_FILE, "archivo.txt");
que abre el archivo para sólo lectura. Luego puedes leer usando
-get (Fichero, char)
que lee un carácter, o
-get_line(Fichero, Cadena, Leidos);
que lee toda la línea y te dice cuántos caracteres tiene dicha línea (leídos).
...
etc..

Busca algún manual de Ada y mírate todas las funciones que hay con respecto a ficheros y verás lo fácil que es.

jodete