ling.cod

来自「编译原理的详细修改和实验报告。。修改了ＰＬ０语言的一些功能。。增加了一部分功能。」· COD 代码 · 共 53 行

=== COMPILE PL0 ===
  0 PROGRAM P1; 
  0 VAR A,B,C; 
  1 BEGIN 
  2  A:=2; 
  4  B:=1; 
  6  READ(C); 
  8  IF C<>3 
 10   THEN  
 11     BEGIN 
 12      C:=A+B; 
 16      WRITE(C); 
 19     END; 
 20  ELSE 
 20   BEGIN 
 20     C:=A-B; 
 24     WRITE(C); 
 27   END 
 27 END. 
  0  JMP   0   1
  1  INI   0   6
  2  LIT   0   2
  3  STO   0   3
  4  LIT   0   1
  5  STO   0   4
  6  OPR   0  16
  7  STO   0   5
  8  LOD   0   5
  9  LIT   0   3
 10  OPR   0   9
 11  JPC   0  20
 12  LOD   0   3
 13  LOD   0   4
 14  OPR   0   2
 15  STO   0   5
 16  LOD   0   5
 17  OPR   0  14
 18  OPR   0  15
 19  JMP   0  27
 20  LOD   0   3
 21  LOD   0   4
 22  OPR   0   3
 23  STO   0   5
 24  LOD   0   5
 25  OPR   0  14
 26  OPR   0  15
 27  OPR   0   0
~~~ RUN PL0 ~~~
? 3
1
~~~ END PL0 ~~~