09.05.2013 Views

Algoritmos y Programación en Pascal

Algoritmos y Programación en Pascal

Algoritmos y Programación en Pascal

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

14.2. Manejo de archivos <strong>en</strong> <strong>Pascal</strong> 287<br />

file of<br />

Figura 14.2.<br />

tipoBase<br />

básico o estructurado, por lo que las compon<strong>en</strong>tes del archivo van a ser valores<br />

de este tipo.<br />

Como es natural, antes de trabajar con el tipo de datos archivo es necesario<br />

conocer su definición. El diagrama sintáctico de la definición de archivos es el<br />

de la figura 14.2.<br />

Por ejemplo, si queremos trabajar con un archivo cuyos elem<strong>en</strong>tos sean arrays<br />

de caracteres, utilizaremos la sigui<strong>en</strong>te definición:<br />

type<br />

tTarjeta = array[1..50] of char;<br />

tArchivo = file of tTarjeta;<br />

var<br />

unaTarjeta: tTarjeta;<br />

archivoTarjetas: tArchivo;<br />

Si <strong>en</strong> un programa <strong>Pascal</strong> se va a utilizar un archivo externo, es necesario<br />

incluir el id<strong>en</strong>tificador del archivo (por ejemplo nombreArchivo) <strong>en</strong> el <strong>en</strong>cabezami<strong>en</strong>to.<br />

Por tanto, un programa que maneje el archivo nombreArchivo, debe<br />

ser declarado como sigue:<br />

Program Tratami<strong>en</strong>toDeArchivo (input, output, nombreArchivo);<br />

Con esta declaración el programa ya reconocerá al archivo con el que vamos<br />

a trabajar y estará preparado para poder realizar operaciones de acceso a dicho<br />

archivo. 2 Así, <strong>en</strong> el ejemplo anterior debemos realizar la sigui<strong>en</strong>te declaración<br />

de programa:<br />

Program Tratami<strong>en</strong>toDeTarjetas (input, output, archivoTarjetas);<br />

2 Además, es necesario asociar el archivo “lógico” (declarado <strong>en</strong> el programa) con un archivo<br />

“físico” <strong>en</strong> el disco (véase el apartado B.9). Para realizar esta operación <strong>en</strong> Turbo <strong>Pascal</strong> se<br />

utiliza la instrucción Assign (nombreArchivoLogico, NombreArchivoFisico). Por ejemplo, la<br />

instrucción<br />

Assign (archivoTarjetas, ’C:\TARJETAS\DATOS.TXT’)<br />

indica que los datos de archivoTarjetas se almac<strong>en</strong>arán <strong>en</strong> el archivo de disco DATOS.TXT d<strong>en</strong>tro<br />

del subdirectorio TARJETAS de la unidad C:.

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!