WRITE A PROGRAM DISPLAYS ON THE PRINTER A VALUE COMPUTED FROM A SUBTRACT OPERATION.
IDENTIFICATION DIVISION. PROGRAM-ID. PROG408. ENVIRONMENT DIVISION. CONFIGURATION SECTION. SPECIAL-NAMES. PRINTER IS PRINTER-DISPLAY. DATA DIVISION. 01 W005-SUBTRAHEND PIC 9 VALUE 2. 01 W005-MINUEND PIC 99 VALUE 12. PROCEDURE DIVISION. PRINT-COMPUTED-VALUE. SUBTRACT W005-SUBTRAHEND FROM W005-MINUEND. DISPLAY "PROGRAM PROG408: THE RESULT OF 12 - 2 IS:" UPON PRINTER-DISPLAY. DISPLAY W005-MINUEND UPON PRINTER-DISPLAY. STOP RUN.