fa1.tmp

来自「编译原理课程设计,清华大学版教材的pl0编译器的源码.」· TMP 代码 · 共 19 行

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.