Pascal/Turbo Pascal - Ayuda con juego del ahorcado

Necesito ayuda con un procedimiento del juego del ahorcado. Lo que necesito es un procedimiento que verifique que la letra que se ingresó corresponde o no a la palabra que se ingresó previamente. E su defecto necesitaría el juego completo pero no el que se encuentra en la pagina rincon del vago.

desde ya muchas gracias por su colaboración.