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