pl.txt

编译原理

var x,y;
procedure p;
var a;
procedure q;
var b;
begin
b:=10
end;
procedure s;
var c,d;
procedure r;
var e,f;
begin
call q
end;
begin
call r
end ;
begin
call s
end ;
begin 
call p
end.