0 PROGRAM EX01; 
  0 VAR A; 
  1 BEGIN 
  2  FOR A:=0 TO 5 
  6 DO  
 11 WRITE(A); 
 15 END. 
  0  JMP   0   1
  1  INI   0   4
  2  LIT   0   0
  3  STO   0   3
  4  LOD   0   3
  5  LIT   0   5
  6  OPR   0  13
  7  JPC   0  15
  8  LOD   0   3
  9  LIT   0   1
 10  OPR   0   2
 11  LOD   0   3
 12  OPR   0  14
 13  OPR   0  15
 14  JMP   0   3
 15  OPR   0   0
*** RUN PL0 ***
0
1
2
3
4
5
*** END PL0 ***