10 lines
143 B
Rexx
10 lines
143 B
Rexx
-- 21 Feb 2026
|
|
include Setting
|
|
|
|
say 'DETECT DIVISION BY ZERO'
|
|
say version
|
|
a = 1; b = 2; c = 3; d = 4
|
|
say (a+b) / (4*c-3*d)
|
|
exit
|
|
|
|
include Abend
|