%INTEGER %PROCEDURE TWO;
%BEGIN
PRINTSTRING(<ENTERING_ALGOL_TWO>);NEWLINE;
TWO:=2;
%END;