线段树练习_codevs1080_树状数组

题目描述 Description

一行N个方格，开始每个格子里都有一个整数。现在动态地提出一些问题和修改：提问的形式是求某一个特定的子区间[a,b]中所有元素的和；修改的规则是指定某一个格子x，加上或者减去一个特定的值A。现在要求你能对每个提问作出正确的回答。1≤N<100000，,提问和修改的总数m<10000条。

输入描述 Input Description

输入文件第一行为一个整数N，接下来是n行n个整数，表示格子中原来的整数。接下一个正整数m，再接下来有m行，表示m个询问，第一个整数表示询问代号，询问代号1表示增加，后面的两个数x和A表示给位置X上的数值增加A，询问代号2表示区间求和，后面两个整数表示a和b，表示要求[a,b]之间的区间和。

输出描述 Output Description

共m行，每个整数

样例输入 Sample Input

6

4

5

6

2

1

3

4

1 3 5

2 1 4

1 1 9

2 2 6

样例输出 Sample Output

22

22

数据范围及提示 Data Size & Hint

1≤N≤100000， m≤10000 。

思路：

题目介绍是线段树然而想到了更简单的方法。开始用f[x]表示前x项之和，x~y段的和就为f[y]-f[x-1]然而会超时毕竟n有100000。接着又想到了树状数组统计求和，原理类似。没有用到线段树但是仍然AC，满满成就感来着。

源代码/pas:

 

var
n,m:longint;
a,f:array[0..100000]of int64;
procedure add(x,y:longint);
begin
while x<=n do
begin
f[x]:=f[x]+y;
x:=x+(x and(-x));
end;
end;
function get(x:longint):longint;
begin
get:=0;
while x>0 do
begin
get:=get+f[x];
x:=x-(x and(-x));
end;
end;
procedure main;
var
i,j,c,x,y:longint;
begin
readln(n);
for i:=1 to n do
begin
readln(a[i]);
add(i,a[i]);
end;
readln(m);
for i:=1 to m do
begin
readln(c,x,y);
case c of
1:add(x,y);
2:writeln(get(y)-get(x-1));
end;
end;
end;
begin
main;
end.