%PROCEDURE ADDINT(I,NO);
%VALUE I;%INTEGER I,NO;
%BEGIN
PRINTSTRING(<ENTERING_ALGOL_ADDINT>);
NEWLINE;
NO:=20+I;
%END;