Una forma de hacer un bucle infinito en Pascal es con un ciclo "repeat" como se muestra a continuación: