fork download
copy 
  1. 	IDENTIFICATION DIVISION.
  2. 	PROGRAM-ID. ADD.
  3. 	ENVIRONMENT DIVISION.
  4.  
  5.  
  6. 	DATA DIVISION.
  7. 	WORKING-STORAGE SECTION.
  8.         77 A   PIC 9999.
  9.         77 B   PIC 9999.
  10.         77 SOL PIC 999v99.
  11.  
  12.  
  13.        	PROCEDURE DIVISION.
  14.        	MAIN-PARA.
  15.  
  16.         DISPLAY " ENTER A ".
  17.         ACCEPT A.
  18.         DISPLAY " ENTER B ".
  19.         ACCEPT B.
  20.  
  21.  
  22.       	ADD-PARA.
  23.       	ADD A B GIVING SOL. 
  24.  
  25.  
  26.       	DISP-PARA.
  27.       	DISPLAY "A IS " A.
  28.       	DISPLAY "B IS " B.
  29.       	DISPLAY "ADDITION =" SOL.
  30.       	STOP RUN.
  31.  
Compilation error #stdin compilation error #stdout 0s 0KB
comments (?)
stdin
copy 
Standard input is empty
compilation info 
prog.cob:2: Error: syntax error, unexpected ADD, expecting WORD or LITERAL
stdout
copy 
Standard output is empty
https://ideone.com/DauBT
language:
Cobol (gnucobol 2.2.0)
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!