fork download
  1. IDENTIFICATION DIVISION.
  2. PROGRAM-ID. addition.
  3. ENVIRONMENT DIVISION.
  4. DATA DIVISION.
  5. WORKING-STORAGE SECTION.
  6. 01 a PIC 99.
  7. 01 b PIC 99.
  8. 01 c PIC 999.
  9. PROCEDURE DIVISION.
  10. DISPLAY "ENTER A".
  11. ACCEPT a.
  12. DISPLAY "ENTER B".
  13. ACCEPT b.
  14. COMPUTE c=a+b.
  15. DISPLAY "SUM=",c.
  16. STOP RUN.
  17.  
Success #stdin #stdout 0.01s 3996KB
stdin
10
43
5
42
1
stdout
ENTER A
ENTER B
SUM=053