'BEGIN' 'INTEGER' N1, N2; 'PROCEDURE' DUMMY; ; 'PROCEDURE' P(X, L); 'VALUE' X; 'INTEGER' X; 'PROCEDURE' L; 'BEGIN' 'PROCEDURE' GOTOL1; 'GOTO' L1; 'IF' X = N1 'THEN' P(X - 1, GOTOL1) 'ELSE' 'IF' X = N2 'THEN' L 'ELSE' P(X - 1, L); L1 :; OUTREAL(99, X) 'END' P; N1 := 4; N2 := 2; P(5, DUMMY); N2 := 0; P(7, DUMMY); 'END'