IDENTIFICATION DIVISION.
       PROGRAM-ID. hello.
       DATA DIVISION.
       WORKING-STORAGE SECTION.
           01  Num1                                PIC 9  VALUE ZEROS.
       PROCEDURE DIVISION.
           DISPLAY "Hello World!".
           DISPLAY Num1.
           STOP RUN.