1230: [Usaco2008 Nov]lites 开关灯

时间:2022-04-07 16:18:59

1230: [Usaco2008 Nov]lites 开关灯

Time Limit: 10 Sec  Memory Limit: 162 MB
Submit: 1162  Solved: 589
[Submit][Status]

Description

Farmer John尝试通过和奶牛们玩益智玩具来保持他的奶牛们思维敏捷. 其中一个大型玩具是牛栏中的灯. N (2 <= N <= 100,000) 头奶牛中的每一头被连续的编号为1..N, 站在一个彩色的灯下面.刚到傍晚的时候, 所有的灯都是关闭的. 奶牛们通过N个按钮来控制灯的开关; 按第i个按钮可以改变第i个灯的状态.奶牛们执行M (1 <= M <= 100,000)条指令, 每个指令都是两个整数中的一个(0 <= 指令号 <= 1). 第1种指令(用0表示)包含两个数字S_i和E_i (1 <= S_i <= E_i <= N), 它们表示起始开关和终止开关. 奶牛们只需要把从S_i到E_i之间的按钮都按一次, 就可以完成这个指令. 第2种指令(用1表示)同样包含两个数字S_i和E_i (1 <= S_i <= E_i <= N), 不过这种指令是询问从S_i到E_i之间的灯有多少是亮着的. 帮助FJ确保他的奶牛们可以得到正确的答案.

Input

* 第 1 行: 用空格隔开的两个整数N和M

* 第 2..M+1 行: 每行表示一个操作, 有三个用空格分开的整数: 指令号, S_i 和 E_i

Output

第 1..询问的次数 行: 对于每一次询问, 输出询问的结果.

Sample Input

4 5
0 1 2
0 2 4
1 2 3
0 2 4
1 1 4

输入解释:
一共有4盏灯; 5个指令. 下面是执行的情况:

1 2 3 4
Init: O O O O O = 关 * = 开
0 1 2 -> * * O O 改变灯 1 和 2 的状态
0 2 4 -> * O * *
1 2 3 -> 1 输出在2..3的范围内有多少灯是亮的
0 2 4 -> * * O O 改变灯 2 ,3 和 4 的状态
1 1 4 -> 2 输出在1..4的范围内有多少灯是亮的

Sample Output

1
2

HINT

 

Source

Gold

题解:这是个比较有趣的线段树问题——将一般的区间加上一个数字变成了区间反转,不过这样也并么有难多少,还是一样的打lazytag,别的没了(phile:看样子你这次程序又偷懒狂用ext往下推呵呵呵 HansBug:那是那是,不过其实不用看样子也能搞,只是繁一点)

 var
i,j,k,l,m,n:longint;
a,b:array[..] of longint;
function max(x,y:longint):longint;inline;
begin
if x>y then max:=x else max:=y;
end;
function min(x,y:longint):longint;inline;
begin
if x<y then min:=x else min:=y;
end;
procedure built(z,x,y:longint);inline;
begin
if x=y then
a[z]:=
else
begin
built(z*,x,(x+y) div );
built(z*+,(x+y) div +,y);
a[z]:=a[z*]+a[z*+];
end;
b[z]:=;
end;
procedure ext(z,x,y:longint);inline;
begin
if b[z]= then exit;
a[z]:=(y-x+)-a[z];
if x<>y then
begin
b[z*]:=-b[z*];
b[z*+]:=-b[z*+];
end;
b[z]:=;
end;
function op(z,x,y,l,r:longint):longint;inline;
var a1,a2,a3,a4:longint;
begin
if l>r then exit();
ext(z,x,y);
if (x=l) and (y=r) then
begin
b[z]:=;
exit(((r-l+)-a[z])-a[z]);
end;
a2:=op(z*,x,(x+y) div ,l,min(r,(x+y) div ));
a3:=op(z*+,(x+y) div +,y,max(l,(x+y) div +),r);
a[z]:=a[z]+a2+a3;
exit(a2+a3);
end;
function cal(z,x,y,l,r:longint):longint;inline;
var a1,a2,a3,a4:longint;
begin
if l>r then exit();
ext(z,x,y);
if (x=l) and (y=r) then exit(a[z]);
exit(cal(z*,x,(x+y) div ,l,min(r,(x+y) div ))+cal(z*+,(x+y) div +,y,max(l,(x+y) div +),r));
end;
begin
readln(n,m);
built(,,n);
for i:= to m do
begin
readln(j,k,l);
case j of
:begin
op(,,n,k,l);
end;
:begin
writeln(cal(,,n,k,l));
end;
end;
end;
readln;
end.