Pascal/Turbo Pascal - registros!!

Se lee la siguiente información de ventas de un supermercado: nº de venta, monto total, fecha, nombre del cajero, nº de cliente. Se lee información hasta que llega el nº de venta 789 la cual debe procesarse.
Informar:
a) La cantidad de ventas realizadas.
b) El promedio de ventas realizadas.
c) El nº de cliente y el nº de venta que tiene mayor monto total.

Un empujoncito para empezar :)

y en que me cambiaria si me diria q la venta 789 no debe procesarce????

GRACIAS GENTE!

Lo de que proceses la 789 sólo es para que la incluyas, para que nadie entienda que al llegar al 789 ya para sin hacer nada

CONST

NUMERO_VENTAS = 789;

TYPE

tVenta = RECORD

numeroVenta : integer;
montoTotal : integer;
fecha : string;
nombreCajero : string;
numeroCliente : integer;

END;

tInfoVentas = ARRAY[1..NUMERO_VENTAS] OF tVenta;

VAR

infoVentas : tInfoVentas;

BEGIN

...

FOR i := 1 TO NUMERO_VENTAS DO

BEGIN

{aqui pedimos los datos de cada venta}

END;

{y ahora hacemos los calculos e informamos sobre los datos que nos piden}

END.

No veo que el ejercicio implique o indique que deben almacenarse los datos de todas y cada una de las ventas. Si el que enunció este ejercicio tenía la intención de obligar a usar registros, falló miserablemente.

mejor dicho....TIPOS DEFINIDOS POR EL USUARIO! !!!!

Ah, entonces sí tiene sentido el enunciado. Y no es necesario el array que propone Dani. Basta con llevar la sumatoria, ir almacenando los datos de la mayor de las ventas y ya está.

jajaja listo..a trabajar ahora!...y en cambiarias la solucion del ejercicio si la venta 789 no debe procesarse....q pensas vs?
muchas grax!

Yo leo del enunciado justo lo contrario, que la venta 789 DEBE procesarse.
El programa de Dani lo único que cambia en el caso que dices tú es que la constante en vez de valer 789, vale 788.

claro,en el enunciado se debe procesar la venta 789!

pero yo te pregunto ahora,a parte, ¿¿en que cambiaria ahora el programa si la venta 789 NO debe procesarse??

perdon si te estoy jodiendo mucho!!!