10 lines
141 B
Text
10 lines
141 B
Text
PROGRAM DIV_BY_ZERO
|
|
|
|
EXCEPTION
|
|
IF ERR=11 THEN PRINT("Division by Zero") END IF
|
|
END EXCEPTION
|
|
|
|
BEGIN
|
|
PRINT(0/3)
|
|
PRINT(3/0)
|
|
END PROGRAM
|