fork download 
  1. identification division.
  2. program-id. prog.
  3. environment division.
  4. data division.
  5. working-storage section.
  6.   77 n pic Z9.
  7.   77 i pic Z9.
  8.   77 r pic Z9.
  9. procedure division.
  10.   display 'Hello, World!'
  11.   accept n
  12.   move 0 to i
  13.   perform until i greater than n
  14.     compute r =
  15.     2**i.
  16.     display r
  17.   end-perform
  18.   stop run.
Compilation error #stdin compilation error #stdout 0s 0KB
comments (?)
stdin 
30
compilation info 
prog.cbl:    16: error: syntax error, on or before '.'
prog.cbl:    16: error: unknown or wrong statement, on or before '.'
prog.cbl:    17: error: syntax error, on or before 'end-perform'
prog.cbl:    17: error: unknown or wrong statement, on or before 'end-perform'
stdout 
Standard output is empty
https://ideone.com/m90NE
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!