11 lines
226 B
Plaintext
11 lines
226 B
Plaintext
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;
|