for.cod

来自「我在三做的课程」· COD 代码 · 共 63 行

=== COMPILE PL0 ===
  0 PROGRAM XYZ; 
  0 VAR I; 
  1 BEGIN 
  2 FOR I:=7+3 DOWNTO 0+1 DO 
  9 WRITE(I); 
 20 FOR I:=1 TO 5 DO 
 23 WRITE(I); 
 34 END. 
  0  JMP   0   0
  1  INI   0   0
  2  LIT   0   0
  3  LIT   0   0
  4  OPR   0   0
  5  STO   0   0
  6  LIT   0   0
  7  LIT   0   0
  8  OPR   0   0
  9  OPR   0   0
 10  LOD  -3   0
 11  OPR   0   0
 12  JPC   0   0
 13  LOD  -3   0
 14  OPR   0   0
 15  LOD  -3   0
 16  LIT   0   0
 17  OPR   0   0
 18  STO  -3   0
 19  JMP   0   0
 20  LIT   0   0
 21  STO  -1   0
 22  LIT   0   0
 23  OPR   0   0
 24  LOD  -1   0
 25  OPR   0   0
 26  JPC   0   0
 27  LOD  -1   0
 28  OPR   0   0
 29  LOD  -1   0
 30  LIT   0   0
 31  OPR   0   0
 32  STO  -1   0
 33  JMP   0   0
 34  OPR   0   0
~~~ RUN PL0 ~~~
10.000000
9.000000
8.000000
7.000000
6.000000
5.000000
4.000000
3.000000
2.000000
1.000000
1.000000
2.000000
3.000000
4.000000
5.000000
~~~ END PL0 ~~~