fork download
copy 
  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
comments (?)
stdin
copy 
10
43
5
42
1
stdout
copy 
ENTER A
ENTER B
SUM=053
https://ideone.com/Yqegh
language:
COBOL 85 (tinycobol-0.65.9)
created:
14 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!