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: Paul Butler (Bucky.Butler@gsa.gov)
We've gotten some complaints (and another program) since then:
(1) there was no language called Algol. There where three Algol60's Hundreds of Algol A,B,C,...,N,....W,X,Y,Z, and Algol68.
(2) The Algol page is a BEALGOL example.
(3) In Algol 60 there was no output defined so Hello, World was somewhat impossible:-)
But given a suitable library of IO procedures:
printstring(`Hello, World')
would be a complete and working version. (Note the abscence of begin/{, end/}, and ;. Also note the use of open and close quotes. They are in ASCII because of Algol 60.)
submitted by: Dr. Richard Botting (dick@csci.csusb.edu)