e01f0.cod

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

=== COMPILE PL0 ===
  0 PROGRAM EX01; 
  0 VAR A,B; 
  1 BEGIN 
  2   A:=60; 
  4   B:=78; 
  6  READ(B); 
  8 IF A>B  
 10 THEN  
---------25=25 
 11 A:=89; 
 14 WRITE(A); 
 17 FOR A:=10; A<15; A:=A+1; DO 
 27 WRITE(A); 
 31 END. 
  0  JMP   0   1
  1  INI   0   5
  2  LIT   0  60
  3  STO   0   3
  4  LIT   0  78
  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  14
 12  LIT   0  89
 13  STO   0   3
 14  LOD   0   3
 15  OPR   0  14
 16  OPR   0  15
 17  LIT   0  10
 18  STO   0   3
 19  LOD   0   3
 20  LIT   0  15
 21  OPR   0  10
 22  JPC   0  31
 23  LOD   0   3
 24  LIT   0   1
 25  OPR   0   2
 26  STO   0   3
 27  LOD   0   3
 28  OPR   0  14
 29  OPR   0  15
 30  JMP   0  19
 31  OPR   0   0
~~~ RUN PL0 ~~~
? 60
60
11
12
13
14
15
~~~ END PL0 ~~~