Algoritmos y Programación en Pascal

298 Capítulo 14. Archivos
Procesar dato
end; {while not EoLn}
ReadLn(archivoDeTexto)
end {while not EoF}
...
end. {LecturaArchivoTexto}
En cualquiera de los casos considerados anteriormente, si se omite el archivo
archivoDeTexto se supondrá por defecto el archivo input para el caso de Read o
el archivo output para el caso de Write, produciéndose, en tal caso, una lectura
por teclado o una escritura por pantalla respectivamente.
Finalmente se debe destacar que los archivos, al igual que todo tipo de datos
compuesto, se pueden pasar como parámetros en funciones y procedimientos,
pero no pueden ser el resultado de una función. No obstante, siempre se deben
pasar como parámetros por variable.
14.4 Ejercicios
1. Basándose en el ejercicio 2 del capítulo 10 desarrolle un programa para las siguientes
tareas:
(a) Invertir una serie de líneas, manteniendo su orden.
(b) Copiar una serie de líneas en orden inverso.
2. Escriba un programa que tabule los coeficientes binomiales n
k (véase el ejercicio
10 del capítulo 6), confeccionando el archivo BINOM.TXT de la siguiente forma:
1
1 1
1 2 1
1 3 3 1
1 4 6 4 1
1 5 10 10 5 1
. . .
Escriba una función que, en vez de hallar el coeficiente n
k , lo consulte en la tabla
creada.
3. Se desea tabular los valores de la función de distribución normal
f(t) = 1
t
1
+ √ e
2 2π
−x2 /2
dx
para los valores de t entre 0 ′ 00 y 1 ′ 99, aumentando a pasos de una centésima
(véase el ejercicio 11 del capítulo 6).
0