Pascal/Turbo Pascal - ultima ayuda con un juego

ya tengo el solitario lo que quiero es poder generar la baraja y mezclarla
Este es el problema a resolver tengo un mazo de 48 cartas (1 lista) cuatro
lugares (listas) para las cartas por palos otros cuatro lugares (listas ) en el caso que no entren an los lugares destinados a los palos y un lugar donde se almacenan las cartas que van saliendo del mazo .

¿y cuál es el problema?.