tt1.cod

编译实验的源程序代码 比较简单

  0 PROGRAM P1; 
  0 VAR I; 
  1 BEGIN 
  2 I:=5; 
  4 IF I=10 THEN I:=2  
  9 ELSE I:=3 ; 
 13 WRITE(I); 
 16 END. 
  0  JMP   0   1
  1  INI   0   4
  2  LIT   0   5
  3  STO   0   3
  4  LOD   0   3
  5  LIT   0  10
  6  OPR   0   8
  7  JPC   0  11
  8  LIT   0   2
  9  STO   0   3
 10  JMP   0  13
 11  LIT   0   3
 12  STO   0   3
 13  LOD   0   3
 14  OPR   0  14
 15  OPR   0  15
 16  OPR   0   0
~~~ RUN PL0 ~~~
3
~~~ END PL0 ~~~