Ayuda con el comando para congelar la pantalla
Tiene razon, pero es mas facil usar readln; esto te permitira esperar a que pulses Enter, sino puedes crear una rutina que espere a una tecla designada por ti para continuar, ahi usarias
Repeat
tecla_a_pulsar := Reakey;
Until Upcase(Tecla_a_pulsar) In ['A','B',.... la tecla que quieras] de la A hasta la Z
y entonces el programa sigue, si quieres usar la tecla escape el valor de tecla a pulsar es #27 (si no me equivoco), en algun manual deben estar los valores de las teclas de funcion.
Suerte