1.txt

PL0编译器,有5个附加功能。编译原理实验用。

var x,y,z;
begin
     x:=-3;
     y:=13;
     read(z);
     if z>4 then
	write(x)
    else
	write(y+x)
end.