RosettaCodeData/Task/Detect-division-by-zero/Run-BASIC/detect-division-by-zero.basic

8 lines
135 B
Plaintext

on error goto [error]
a = 1 / 0
wait
[error] ' error 11 is division by zero err number
If err = 11 Then print "Division by Zero"
wait