else.cod

我在三做的课程

=== COMPILE PL0 ===
  0 PROGRAM EX; 
  0 VAR I,X,Y,MAX; 
  1 BEGIN 
  2  I:=100; 
  4  IF I>50 THEN WRITE(I); 
 11  IF I<>50 THEN WRITE(I+900); 
 20  READ(I,X,Y); 
 26     IF I>X THEN  
 29         MAX:=I  
 30     ELSE MAX:=X; 
 35    IF Y>MAX 
 36     THEN MAX:=Y; 
 42   WRITE(MAX); 
 44 END. 
  0  JMP   0   0
  1  INI   0   0
  2  LIT   0   0
  3  STO   0   0
  4  LOD-100   0
  5  LIT   0   0
  6  OPR   0   0
  7  JPC   0   0
  8  LOD-100   0
  9  OPR   0   0
 10  JMP   0   0
 11  LOD-100   0
 12  LIT   0   0
 13  OPR   0   0
 14  JPC   0   0
 15  LOD-100   0
 16  LIT   0   0
 17  OPR   0   0
 18  OPR   0   0
 19  JMP   0   0
 20  OPR   0   0
 21  STO-100   0
 22  OPR   0   0
 23  STO   0   0
 24  OPR   0   0
 25  STO   0   0
 26  LOD-900   0
 27  LOD-900   0
 28  OPR   0   0
 29  JPC   0   0
 30  LOD-900   0
 31  STO   0   0
 32  JMP   0   0
 33  LOD-900   0
 34  STO-900   0
 35  LOD-900   0
 36  LOD-900   0
 37  OPR   0   0
 38  JPC   0   0
 39  LOD-900   0
 40  STO-900   0
 41  JMP   0   0
 42  LOD-900   0
 43  OPR   0   0
 44  OPR   0   0
~~~ RUN PL0 ~~~
100.000000
1000.000000
? 0
? 0
? 0
54783.000000
~~~ END PL0 ~~~