# type sir=array[1..15000] of longint;  
# var a,c:sir;  
#     f,g:text;  
#     m:longint;  
#     n,s1,s2,z,y,i,j:longint;  
#     x:longint;  
# begin  
#      assign(f,'datorii.in'); reset(f);  
#      assign(g,'datorii.out'); rewrite(g);  
#      readln(f,n,m);  
#      for i:=1 to n do read(f,a[i]);  
#      for i:=1 to n do c[i]:=0;  
#      readln(f);  
#      for i:=1 to n do  
#      begin  
#           y:=((i)xor(i-1))and(i);  
#           for j:=i+1-y to i do  
#               c[i]:=c[i]+a[j];  
#      end;  
#      for i:=1 to m do  
#      begin  
#           readln(f,x,y,z);  
#           if x=0 then  
#                while y<=n do  
#                begin  
#                     c[y]:=c[y]-z;  
#                     y:=y+((y)xor(y-1))and(y);  
#                end  
#                  else  
#                  begin  
#                       s1:=0;  
#                       while z>0 do  
#                       begin  
#                            s1:=s1+c[z];  
#                            z:=z-(((z)xor(z-1))and(z));  
#                       end;  
#                       dec(y);  
#                       s2:=0;  
#                       while y>0 do  
#                       begin  
#                            s2:=s2+c[y];  
#                            y:=y-((y)xor(y-1))and(y);  
#                       end;  
#                       writeln(g,s1-s2);  
#                  end;  
#      end;  
#      writeln(g);  
#      close(g);  
# end.