'COMMENT' CHECK ON NONTERMINATING FOR LOOPS IN OPT MODE;
'BEGIN' 'INTEGER'I
;'FOR' I:= 1 'STEP' 1 'UNTIL' 3 'DO' PRINT(I,3,0);
NEWLINE;
'FOR' I:= 1 'STEP' 2 'UNTIL' 5 'DO' PRINT (I,3,0);
NEWLINE;
PRINT(I,3,0)
'END'