SoloCodigo

Antes que nada quiero decir que me he leído las reglas y mi fin no es que me 'hagan la tarea'. Lo que me gustaría de mi post es que me ayuden a plantear correctamente la 'cabecera' del progrma, es decir, a declarar los nodos, los punteros dentro del type....pero, obviamente debo poner el texto de la practica para que me puedan ayudar.

Repito: mi fin no es que me resuelvan la practica. Lo que necesito es plantear el comienzo correctamente porque sé que es ahí donde me está fallando el código.

Yo he querido hacer algo así, pero esta incorrecto :
program ayuda;
uses
   crt;
type
   supermercado = record
      total_cajas : integer;
   end;

   enlace = ^Tcolas;
   Tcolas = record
      num_caja: integer;
      cliente : string;
      siguiente: enlace;
   end;

var
   punteros_a_declarar : enlace;
   super : supermercado;

Pues bien.... el enunciado es el siguiente: (Gracias por la ayuda!)
"Debemos simular las colas de un supermercado mediante estructuras dinámicas, teniendo en cuenta que cada persona actuará en la cola según su personalidad (MUY AMABLE, AMABLE, POCO AMABLE).
   • Las personas MUY AMABLES permitirán que otra persona que está detrás suya en la cola le adelante si dicha
persona es mayor de 65 años o si está embarazada.
   • Las personas AMABLES permitirán que otra persona que está detrás suya en la cola le adelante si dicha persona está embarazada.
   • Las personas POCO AMABLES nunca permitirán que otra persona le adelante.
   • Tanto las personas embarazadas, como las mayores de 65 años nunca podrán ser adelantadas.

Se pide: Implementar los subprogramas necesarios para simular los adelantamientos realizados cuando una nueva persona llega a una cola del supermercado. Para ello se presentará un menú con las siguientes opciones:

1.- Introducir/Modificar número de colas del supermercado.
2.- Introducir persona en una cola.
3.- Visualizar cola.
4.- Simular adelantamiento.

         Una vez que una persona paga su compra será eliminada de la cola y pasara a una pila      
        "supermercado" donde se almacenarán los importes de cada compra.

5.- Pagar compra en una cola.