Pascal/Turbo Pascal - maldito programa dos

otro programa y es el ultimo , gracias foro
Una estacion de servicio registra en un archivo organizado de modo secuencial la información diaria de los litros de combustible despachados durante el mes de octubre.
El archivo MOVI.DAT se encuentra ordenado por dia

MOVI.DAT
• dia
• codigo_surtidor [1-350]
• codigo_combustible [1-10]
• litros_despachados

en otros dos archivos , de acceso directo, se almacenan la información de surtidores y precios .

SURTIDOR.DAT
• código _surtidor [1-350] //clave
• litros_despachados

PRECIOS.DAT
• codigo_combustible [1-10] //clave
• tipo
• precio_por_litro

realizar:
1) aplicando el algoritmo de corte de control sobre el archivo MOVI.DAT , imprimir un informe que muestre por pantalla la recaudación diaria y al finalizar el total del mes
2) con la información de MOVI.DAT actualizar la información almacenada en SURTIDOR.DAT
3) indicar el tipo de combustible del que se halla despachado la mayor cantidad de litros.

Importante:
Es imprescindible optimizar el acceso a los archivos. El archivo secuencial debe ser leido una sola vez . Debera evitarse acceder al archivo PRECIOS.DAT por cada registro leido del secuencial . El archivo SURTIDOR.DAT debera ser actualizado al finalizar el informe . Todos los archivos se encuentran ya cargados .
Incluir en el programa las definiciones de tipo, archivos y variables .