IDENTIFICATION DIVISION.
     PROGRAM-ID ADDITION.
     ENVIRONMENT DIVISION.
     DATA DIVISION.
     WORKING-STORAGE SECTION.
     01 A PIC 99.
     01 B PIC 99.
     01 C PIC 999.
     PROCEDURE DIVISION.
           DISPLAY "ENTER A".
           ACCEPT A.
           DISPLAY "ENTER B".
           ACCEPT B.
           COMPUTE C=A+B.
           DISPLAY "SUM IS ",C.
           STOP RUN.