Pascal/Turbo Pascal - AYUDA

Necesito saber como puedo hacer un programa para un video, donde tengo que almacenar informacion de peliculas, donde cada pelicula debe tener un codigo, el nombre y la cantidad de copias en existencia.

Luego tengo que modificar el registro para poner si una pelicula salio, por ejemplo si la pelicula codigo #001, copia 3, fue alquilada, entonces debe ponerse un 0 en lugar de 3.

Necesito me guien, es urgente

gracias

Son demasiadas cosas juntas. Se más específico.

Para modificar un registro la lógica sería:

Read(Archivo, Registro);
Registro.Campo:=AlgunValor;
Seek(Archivo, FilePos(Archivo)-1);
Write(Archivo, Registro);