test!=.pl0

编译原理源码（包括语法分析

PROGRAM TEST;
	VAR A,B,C;
	BEGIN
  		A:=88;
  		READ(B);
  		IF A<>B	THEN
  		BEGIN
  			A-=2;
  			WRITE(A); 
  		END
	END.