Programa de parada Pascal até que qualquer botão seja pressionado

Program PauseUntilKey;

Begin
    writeln('Press any key to continue...');
    
    readln();      //pause program until any key is pressed
    
    writeln('Program Resumed!');
End.
ALeonidou