ISO Pascal reference manual

Appendix C
Execution errors
*Execution error -- user termination
This systems permits the user to force an executing program to stop with
this message in order to provide diagnostic information, for example when a
program goes into an infinite loop.
*Execution error -- real value too large
This message indicates that an real (floating-point) operation has resulted in
a value which is too large to be handled by the normal real hardware.
PROGRAM error(output);
VAR n : real;
BEGIN
END.
times : integer;
n := 1.0;
FOR times := 1 TO 100 DO
n := SQR(n); (bound to get too big}
writeln('Error not detected');
*Execution error -- attempted division by zero
The program has attempted to divide one quantity by zero.
PROGRAM error(output);
VAR j, k : integer;
BEGIN
END.
j := 123;
k := 0;
writeln('123/0 = j/k); (wrong}
writeln('Error not detected');
Pascal Issue 1 103