PKU2155 matrix

依旧是树状数组，今天这道是二维树状数组。

首先呢，我们最好把这题降一个维度研究研究，之后再推广到二维情况。讨论一下，对于闭区间 [0,n] ，我们有这样的操作：C（a,b）和Q（a,b）功能同题意。于是我们发现，一个节点的状态仅仅和它改变的次数有关。这样的话，我们就能得到一种把改变状态转化为统计前缀和的问题——我们将辅助数组c[a] 和 c[b+1] 分别加1。这样转变之后，当我们查询节点x的时候，我们发现当x∈（0,a）或者x∈（b,n）时，前缀和sum(x) 是偶数，当x∈[a,b] 时，它就是个奇数。

    经过以上分析，我们将它推广至二维树状数组就得到了这样精巧的正解！

program matrix; const nn=1001; var c:array[0..nn,0..nn] of longint; ii,t,n,k,i,xa,xb,ya,yb:longint; ch:char; firstwrite:boolean; function lowbit(x:longint):longint; begin exit(x and (-x)); end; procedure change(x,y,delta:longint); var yy:longint; begin while x<=n do begin yy:=y; while yy<=n do begin inc(c[x,yy],delta); inc(yy,lowbit(yy)); end; inc(x,lowbit(x)); end; end; function sum(x,y:longint):longint; var yy:longint; begin sum:=0; while x>0 do begin yy:=y; while yy>0 do begin inc(sum,c[x,yy]); dec(yy,lowbit(yy)); end; dec(x,lowbit(x)); end; end; begin assign(input,'a.in'); reset(input); assign(output,'a.out'); rewrite(output); readln(t); firstwrite:=false; for ii:=1 to t do begin if firstwrite then writeln else firstwrite:=true; readln(n,k); inc(n); fillchar(c,sizeof(c),0); for i:=1 to k do begin read(ch); if ch='C' then begin readln(xa,ya,xb,yb); change(xb+1,yb+1,1); change(xa,ya,1); change(xa,yb+1,-1); change(xb+1,ya,-1); end else begin readln(xa,ya); writeln(sum(xa,ya) mod 2); end; end; end; close(input); close(output); end.