=== COMPILE PL0 ===
  0 PROGRAM EX01; 
  0 VAR A,B; 
  1 BEGIN 
  2   A:=88; 
  4   B:=11; 
  6  READ(B); 
  8 IF A>B  
 10 THEN  
---------25=25 
 11 A:=100; 
 14 WRITE(A); 
 17 DO 
 17 A:=A-10; 
 21 WRITE(A); 
 24 UNTIL A<10; 
 28  
 28 END. 
  0  JMP   0   1
  1  INI   0   5
  2  LIT   0  88
  3  STO   0   3
  4  LIT   0  11
  5  STO   0   4
  6  OPR   0  16
  7  STO   0   4
  8  LOD   0   3
  9  LOD   0   4
 10  OPR   0  12
 11  JPC   0  14
 12  LIT   0 100
 13  STO   0   3
 14  LOD   0   3
 15  OPR   0  14
 16  OPR   0  15
 17  LOD   0   3
 18  LIT   0  10
 19  OPR   0   3
 20  STO   0   3
 21  LOD   0   3
 22  OPR   0  14
 23  OPR   0  15
 24  LOD   0   3
 25  LIT   0  10
 26  OPR   0  10
 27  JPC   0  17
 28  OPR   0   0
~~~ RUN PL0 ~~~
? 0
100
90
80
70
60
50
40
30
20
10
0
~~~ END PL0 ~~~