5 lines
106 B
COBOL
5 lines
106 B
COBOL
|
DIVIDE foo BY bar GIVING foobar
|
||
|
|
ON SIZE ERROR
|
||
|
|
DISPLAY "Division by zero detected!"
|
||
|
|
END-DIVIDE
|