Pascal - Problema labirinto

non ho ancora scritto il codice sto prima cercando di finire l'algoritmo. appena faccio il codice ve lo posto magari servirà a qualcuno in futuro.