fork download 
  1. IDENTIFICATION DIVISION.                                        
  2.  PROGRAM-ID. MULPGM.                                             
  3.  ENVIRONMENT DIVISION.                                           
  4.  DATA DIVISION.                                                  
  5.  WORKING-STORAGE SECTION.                                        
  6.  77 NUM1        PIC 9(3) VALUE ZEROS.                            
  7.  77 NUM2        PIC 9(3) VALUE ZEROS.                            
  8.  77 NUM3        PIC 9(3) VALUE ZEROS.                            
  9.  77 RESU        PIC 9(4) VALUE ZEROS.                            
  10.  PROCEDURE DIVISION.                                             
  11.  MAIN-PARA.                                                      
  12.         DISPLAY 'ENTER THE NUMBER ONE VALUE'.                    
  13.         ACCEPT NUM1.                                             
  14.         DISPLAY 'ENTER THE NUMBER TWO VALUE'.                    
  15.         ACCEPT NUM2.                                             
  16.         DISPLAY 'ENTER THE NUMBER THREE VALUE'.                  
  17.         ACCEPT NUM3.                                             
  18.         COMPUTE RESU = NUM1 * NUM2 * NUM3.                       
  19.         DISPLAY 'THE MULTIPLICATION OF 3 NOS:' RESU.             
  20.         STOP RUN.
Compilation error #stdin compilation error #stdout 0s 0KB
comments (?)
stdin 
1
2
10
42
11
compilation info 
prog.cob:1: Warning: Invalid indicator 'F' at column 7
prog.cob:5: Warning: Invalid indicator 'M' at column 7
prog.cob:19: Warning: File not terminated by a newline
prog.cob:1: Error: syntax error, unexpected WORD, expecting PROGRAM_ID
stdout 
Standard output is empty
https://ideone.com/A2WAA
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!