COBOL numbers
1234567891011121314151617181920
IDENTIFICATION DIVISION.
PROGRAM-ID. hello.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 example-1 PIC 99V99 USAGE COMP.
01 example-2 PIC $99.99 USAGE DISPLAY.
PROCEDURE DIVISION.
MOVE example-1 TO example-2
DISPLAY example-1 " " example-2
ADD 0.01 TO example-1
MOVE example-1 TO example-2
DISPLAY example-1 " " example-2
ADD 0.99 TO example-1
MOVE example-1 TO example-2
DISPLAY example-1 " " example-2
GOBACK
.
Cobol
INFO