t1.pl0

pl0编译器,包括词法分析,语法语义分析,以及解释执行

const a=100;
var x,y; 
procedure abc; 
begin 
  read(x); 
end; 
begin 
  call abc; 
  y:=1+3*2; 
  x:=x+y+a; 
  write(x); 
end.