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.  
  32.  
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/rYdEq
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!