for.cod

来自「刚开始设计时对PL/0了解并不多,随着设计的开展,对PL/0也有了一定的认识,了」· COD 代码 · 共 46 行

=== COMPILE PL0 ===
  0 PROGRAM XYZ; 
  0 VAR 
  1 I:INTEGER; 
  1 BEGIN 
  2 FOR I:=10+3 DOWNTO -1-(-2) DO 
 14 WRITE(I); 
 20 END. 
  0  JMP   0   1
  1  INI   0   4
  2  LIT   0  10
  3  LIT   0   3
  4  OPR   0   2
  5  STO   0   3
  6  LOD   0   3
  7  LIT   0   1
  8  OPR   0   1
  9  LIT   0   2
 10  OPR   0   1
 11  OPR   0   3
 12  OPR   0  11
 13  JPC   0  20
 14  LOD   0   3
 15  OPR   0  14
 16  LOD   0   3
 17  LIT   0   1
 18  OPR   0   3
 19  JMP   0   5
 20  OPR   0   0
~~~ RUN PL0 ~~~
13.000000
12.000000
11.000000
10.000000
9.000000
8.000000
7.000000
6.000000
5.000000
4.000000
3.000000
2.000000
1.000000
~~~ END PL0 ~~~