UNIDAD 5: PASCAL REGISTROS Y ARCHIVOS SECUENCIALES

TEMA 10: OPERACIONES CON CAMPOS PASCAL

En este tema se analiza la manera de poder realizar operaciones o procesos con los campos de los registros en el archivo secuencial, lo unico importante a considerar es que los campos del registro son en cierta medida igual que variables normales y por tanto se pueden procesar de manera normal como lo muestra el ejemplo.

prog23.cpp

program prog23;
uses crt;
type
alumnos = RECORD
clave:integer;
nombre:string[30];
estatura:real;
end;
var
alumno:alumnos;
archivo: file of alumnos;
temporal: file of alumnos;
BEGIN
(* creando y abriendo los dos archivos *)
assign(archivo,'c:\prog\alumnos.dat');
reset(archivo);
assign(temporal,'c:\prog\temporal.dat');
rewrite(temporal);
clrscr;
(* iniciando ciclo de lectura de registros en archivo original *)
while not(EOF(archivo)) do
begin
READ(archivo,alumno);
(* realizando operacion ejemplo aumentar 15 cms a cada estatura *)
alumno.estatura := alumno.estatura + 0.15 ;
(* grabando a temporal *)
WRITE(temporal,alumno);
end;
(* cerrando archivos *)
close(archivo);
close(temporal);
(* borrando y eliminando archivos *)
erase(archivo);
rename(temporal,'c:\prog\alumnos.dat');
(* avisando *)
write('ESTATURAS AUMENTADAS <enter> para continuar');
readln;
END.

corrida:

image254.jpg

como se observa la solucion es muy sencilla solo se ocupa el registro original y los dos archivos el original y el temporal, se va leyendo registro a registro de archivo original al registro en memoria correspondiente, se realiza la operacion u proceso deseado con el registro y se graba el registro modificado en el archivo temporal, al final se elimina archivo original y se renombra el archivo temporal.

PROGRAMACION TAREAS PASCAL :

CONSTRUIR PROCEDIMEINTOS QUE PROCESEN ALGUNOS CAMPOS DE LOS ARCHIVOS EJEMPLOS QUE YA TIENEN CONSTRUIDOS.

Politica de Privacidad