neq.cod

来自「PL/0语言是Pascal语言的一个子集」· COD 代码 · 共 33 行

=== COMPILE PL0 ===
  0 PROGRAM NEQ; 
  0 VAR A,B; 
  1 BEGIN 
  2   READ(A,B); 
  6   IF A<>B THEN 
  9   WRITE(B); 
 13   WRITE(A); 
 16 END. 
  0  JMP   0   1
  1  INI   0   5
  2  OPR   0  16
  3  STO   0   3
  4  OPR   0  16
  5  STO   0   4
  6  LOD   0   3
  7  LOD   0   4
  8  OPR   0   9
  9  JPC   0  13
 10  LOD   0   4
 11  OPR   0  14
 12  OPR   0  15
 13  LOD   0   3
 14  OPR   0  14
 15  OPR   0  15
 16  OPR   0   0
~~~ RUN PL0 ~~~
? 0
? 0
0
~~~ END PL0 ~~~