树状数组——求和问题题解

题目：求和问题

描述：

【问题描述】
在一个长度为n的整数数列中取出连续的若干个数，并求它们的和。
【输入格式】
输入由若干行组成，第一行有一个整数n

第二行有n个整数

第三行有一个整数m

下面m行，每行两个整数i与j(i<=j)，表示求和的起始和终止位置。

【输出格式】

输出有m行, 每行一个整数，表示这个数段数列的和。

【输入样例】

输入文件

8

2 3 4 7 8 9 10 234

5

2 3

4 7

1 3

7 7

7 8

输出文件

7

34

9

10

244

【数据规模】

对于40%的数据，n<=1000,m<=1000,数列中的数不超过32767，数列的和不超过10^9

对于70%的数据，n<=10000,m<=2*10^5,数列中的数不超过32767

对于100%的数据，n<=10000,m<=2*10^5,数列中的数不超过10^9

果的树状数组，直接处理，查找1~i-1的值和1~j的值，相减即为答案。但数据大小较坑，但int64轻松解决。评论中说有一组数据还有0 0的奇葩情况……于是很多人被坑……感谢评论，直接特判……还有就是，以后一定要注意读入的方式，因为写成了换行读入，结果WA了一次，以后一定要注意。

AC代码：

{

program zht;
var
n,i,j,t,x,y,m:longint;
q,w:int64;
a,c:array[0..20000] of int64;

begin
assign(input,'sum.in');
assign(output,'sum.out');
reset(input);
rewrite(output);
readln(n);
for i:=1 to n do
read(a[i]);

for i:=1 to n do
begin
t:=i and (-i);
for j:=i-t+1 to i do
c[i]:=c[i]+a[j];
end;  // jian shu

t:=0;

readln(m);

for i:=1 to m do
begin
readln(x,y);
if x+y=0 then begin writeln('0'); continue; end;
q:=0;
w:=0;
t:=x-1;
while t>0  do
begin
q:=q+c[t];
t:=t-(t and (-t));
end;
t:=y;

while t>0 do
begin
w:=w+c[t];
t:=t-(t and (-t));
end;

writeln(w-q);
end;

close(input);
close(output);

end.

}
<Marvolo原创，严禁转载>