'BEGIN' 'COMMENT' SIMPLE-MINDED DEMO; 'BOOLEAN' B1, B2; 'INTEGER' I,J; SKIP; SKIP; WRITE (1," *** THIS IS AN ALGOL DEMONSTRATION ***"); SKIP; START: SKIP; SKIP; WRITE (1,"ENTER 2 INTEGERS : "); READ (1,I,J); B1 := I=0; B2 := J=0; 'IF' B1 'AND' B2 'THEN'  'GOTO' EXIT; 'IF' I>J 'THEN'  WRITE (1,"FIRST NUMBER (",I," ) IS GREATER.") 'ELSE'  'IF' J>I 'THEN'   WRITE (1,"SECOND NUMBER (",J," ) IS GREATER.")  'ELSE'   WRITE (1,"THE NUMBERS ARE EQUAL."); 'GOTO' START; EXIT: SKIP; SKIP; WRITE (1,"TWO ZEROES STOPS THIS PROGRAM,"); SKIP; WRITE (1,"TYPE 'ST 400' TO RESTART."); SKIP; SKIP 'END' *** NOTICE NO SEMI-COLON NEEDED ON PREVIOUS STATEMENT *** $