Originariamente inviato da bubi1
quello non morira' mai
codice:
000100 IDENTIFICATION DIVISION. 
000200 PROGRAM-ID. HELLOWORLD. 
000300 
000400* 
000500 ENVIRONMENT DIVISION. 
000600 CONFIGURATION SECTION. 
000700 SOURCE-COMPUTER. RM-COBOL. 
000800 OBJECT-COMPUTER. RM-COBOL. 
000900 
001000 DATA DIVISION. 
001100 FILE SECTION. 
001200 
100000 PROCEDURE DIVISION. 
100100 
100200 MAIN-LOGIC SECTION. 
100300 BEGIN. 
100400 DISPLAY " " LINE 1 POSITION 1 ERASE EOS. 
100500 DISPLAY "Hello world!" LINE 15 POSITION 10. 
100600 STOP RUN. 
100700 MAIN-LOGIC-EXIT. 
100800 EXIT.


fonte