Pascal/Turbo Pascal - Pausa en Procedimiento Eorden (visualizar arboles)

Necesito que este procedimiento haga una pausa cuando la pantalla está completa, ya que los primeros elementos no se pueden ver por pantalla debido a que pasan muy rápido. Al ser recursivo no se me ocurre como poder hacer una pause. ¿Alguna idea?. Gracias.

PROCEDURE Enorden (ABB: tArbol);
{Enorden (ABB) ----> ABB
Efecto: Muestra por pantalla los datos del árbol ordenados de menor a mayor
según la clave.}
BEGIN
IF ABB <> nil THEN
BEGIN
Enorden (ABB^.iz);
Writeln (ABB^.info);
Enorden (ABB^.de);
END
END;

Ya lo conseguí, hice esto por recomendacion de Ivanchuk:

PROCEDURE Enorden (ABB: tArbol);
{Enorden (ABB) ----> ABB
Efecto: Muestra por pantalla los datos del rbol ordenados de menor a mayor
seg£n la clave "Clave.identificador".}
BEGIN
IF ABB <> nil THEN
BEGIN
Enorden (ABB^.iz);
Writeln ('Identificador: "',ABB^.info.identificador,'"');
Writeln ('T¡tulo: "',ABB^.info.titulo,'"');
Writeln ('C¢digo posici¢n: "',ABB^.info.codigo_pos,'"');
Writeln;
IF Wherey > 47 THEN
BEGIN
Readln;
ClrScr;
END;
Enorden (ABB^.de);
END
END;