input file name(PL/0 program file)?   test2.pl0
list object code  ?y
   0 var
   1  i,s;
   1 begin
   2  i:=1;
   4  s:=0;
   6  while i<=100  do
  10   begin
  10     s:=s+i;
  14      i:=i+1
  16   end;
  19   write(s)
  21 end.
   1  int    0    5
   2  lit    0    1
   3  sto    0    3
   4  lit    0    0
   5  sto    0    4
   6  lod    0    3
   7  lit    0  100
   8  opr    0   13
   9  jpc    0   19
  10  lod    0    4
  11  lod    0    3
  12  opr    0    2
  13  sto    0    4
  14  lod    0    3
  15  lit    0    1
  16  opr    0    2
  17  sto    0    3
  18  jmp    0    6
  19  lod    0    4
  20  opr    0   14
  21  opr    0   15
  22  opr    0    0
start pl0
    5050