ALGOL

Here is an example of an ALGOL program. This runs on a Unisys (Burroughs) A-Series mainframe.

     BEGIN
     FILE F (KIND=REMOTE);
     EBCDIC ARRAY E [0:11];
     REPLACE E BY "HELLO WORLD!";
     WHILE TRUE DO
       BEGIN
       WRITE (F, *, E);
       END;
     END.

submitted by: Bucky.Butler@gsa.gov (Paul Butler)