PL/1

HELLO:   PROCEDURE OPTIONS (MAIN);

             /* A PROGRAM TO OUTPUT HELLO WORLD */
             FLAG = 0;

LOOP:     DO WHILE (FLAG = 0);        
             PUT SKIP DATA('HELLO WORLD!');
          END LOOP;

END HELLO;