fa1.tmp

编译原理课程设计,清华大学版教材的pl0编译器的源码.

Iput pl/0 file ?y
0 const c=3;

1 var b(1:c),a,d;

1 begin

2   read(a);

4   read(d);

6   read(b(a));

11   read(b(b(a)+d));

19   write(b(3));

23 end.