RosettaCodeData/Task/Detect-division-by-zero/NS-HUBASIC/detect-division-by-zero.basic
2023-07-01 13:44:08 -04:00

5 lines
109 B
Text

10 ON ERROR GOTO 40
20 PRINT 1/0
30 END
40 IF ERR = 10 THEN PRINT "DIVISION BY ZERO IN LINE"ERL
50 RESUME 30