UNIDAD 5: PROGRAMACION PASCAL REGISTROS Y ARCHIVOS SECUENCIALES

TEMA 8: FILTROS ARCHIVOS PROGRAMACION PASCAL

Otro problema similar al anterior es el de filtros, es decir en muchas ocasiones es necesario obtener informacion acerca de un subconjunto de renglones de el archivo.

Por ejemplo todos los estudiantes que sean mayores de 17 anos, o todos los clientes que sean de Tijuana, etc., a esto le llamamos filtros o condiciones.

prog21.pas

program prog21;

uses crt;

type

alumnos = RECORD

clave:integer;

nombre:string[30];

estatura:real;

end;

var

alumno:alumnos;

archivo: file of alumnos;

clave:real;

BEGIN

(* creando y abriendo el archivo *)

assign(archivo,'c:\prog\alumnos.dat');

reset(archivo);

(* capturando condicion *)

clrscr;

write('clave >= que : ');readln(clave);

(* iniciando ciclo de lectura de registros en archivo *)

while not(EOF(archivo)) do

begin

READ(archivo,alumno);

if alumno.clave > clave then

begin

write('clave : ');writeln(alumno.clave);

write('nombre : ');writeln(alumno.nombre);

write('estatura : ');writeln(alumno.estatura:0:2);

end;

end;

(* cerrando archivo *)

close(archivo);

write('<enter> para continuar');readln;

END.

corrida:

Como se observa es un problema y una solucion similar al tema anterior de busquedas.

TAREAS PROGRAMACION PASCAL

HACERLES PROGRAMAS DE FILTRADO A LOS ARCHIVOS ANTERIORES, PERO LA CONDICION DE BUSQUEDA FORMARLA COMPLETAMENTE CON VARIABLES UNO PARA LA VARIABLE Y OTRO PARA EL OPERADOR RELACIONAL PARA EL DATO, ESTO PERMITIRIA QUE SE PUDIERA FILTRAR EL ARCHIVO POR CUALQUIER CAMPO excepto los reales que no se pueden meter en condiciones.