General

Porque la sentencia mazo.colocarcarta(elegircarta()) está dentro de un while true. Por lo tanto lo que termina haciendo ese subproceso es polling, es decir consulta cada vez que tiene el procesador si la cantidad de cartas del mazo disminuyo y visto de otra forma lo que hace ese subproceso(digo subproceso porque está dentro de un cobegin-coend dentro de otro proceso) es esperar a que algún jugador saque una carta, de ahi el busy waiting, el problema es que esa espera consume procesador. En términos de eficiencia en uso de CPU  no es bueno tener ese polling ahora con respecto a la correctitud de la solución no se como te lo pueden tomar.

El otro detalle tal vez surge de mi interpretación de la letra. Yo había entendido que para jugar primero hay que sacar una carta. En tu código cuando ordenartablero = false el jugador va a jugar sin sacar carta.

Hola,

lo de busy waiting lo podes solucionar, como bien dijeron, trancando al jefe en una condition. Lo podes pensar si queres como una especie de productor-consumidor con un buffer limitado, cuando el buffer está lleno trancas con una condition y el proceso que estaba ejecutando en el monitor lo pierde. Y en caso que sacas una carta haces un signal, que podría perderse, indicando que hay lugar disponible. Yo ese lo hice así:

procedure sacarCarta(carta: out[ESPERAR,JUGAR]);
begin
       if cantCartas = 0 then
              carta:= ESPERAR
       else
              cantCartas:= cantCartas - 1;
              carta:= sacar_carta_de_mazo();
              mazolleno.signal;
       end;
end;

procedure colocarCarta(carta: in[ESPERAR, JUGAR]);
begin
        if cantCartas = 10 then
              mazolleno.wait;
        end;
        cantCartas:= cantCartas + 1;
        colocar_carta_en_mazo(carta);
end;

Por otra parte, yo interpreté creo que lo mismo de la letra, supuse que si no estaba el jefe de mesa entonces jugaban directamente, no se si estará bien.

Saludos!