e01f1.cod

编译原理课程设计 PL/0语言编译程序 c++builder

=== COMPILE PL0 ===
  0 PROGRAM EX01; 
  0 VAR A,B; 
  1 BEGIN 
  2   A:=88; 
  4   B:=11; 
  6  READ(B); 
  8 IF A>B  
 10 THEN  
---------25=25 
 11 A:=100 
 13 ELSE A:=90; 
 17 WRITE(A); 
 20 FOR A:=5; A>1; A:=A-1; DO 
 30 B-=B; 
 35 WRITE(B); 
 38 END. 
  0  JMP   0   1
  1  INI   0   5
  2  LIT   0  88
  3  STO   0   3
  4  LIT   0  11
  5  STO   0   4
  6  OPR   0  16
  7  STO   0   4
  8  LOD   0   3
  9  LOD   0   4
 10  OPR   0  12
 11  JPC   0  15
 12  LIT   0 100
 13  STO   0   3
 14  JMP   0  17
 15  LIT   0  90
 16  STO   0   3
 17  LOD   0   3
 18  OPR   0  14
 19  OPR   0  15
 20  LIT   0   5
 21  STO   0   3
 22  LOD   0   3
 23  LIT   0   1
 24  OPR   0  12
 25  JPC   0  35
 26  LOD   0   3
 27  LIT   0   1
 28  OPR   0   3
 29  STO   0   3
 30  LOD   0   4
 31  LOD   0   4
 32  OPR   0   3
 33  STO   0   4
 34  JMP   0  22
 35  LOD   0   4
 36  OPR   0  14
 37  OPR   0  15
 38  OPR   0   0
~~~ RUN PL0 ~~~
? 101
90
0
~~~ END PL0 ~~~