#C. 「一本通 4.6 练习 1」宠物收养所

输入格式

第一行为一个正整数 n，表示一年当中来到收养所的宠物和领养者的总数； 接下来的 n 行，按到来时间的先后顺序描述了一年当中来到收养所的宠物和领养者的情况。每行有两个整数 a,b，其中 a=0 表示宠物，a=1 表示领养者，正数 b 表示宠物的特点值或是领养者希望领养宠物的特点值。 同一时间呆在收养所中的，要么全是宠物，要么全是领养者，这些宠物和领养者的个数不会超过  个。

输出格式

仅有一个正整数，表示一年当中所有收养了宠物的领养者的不满意程度的总和对  取模以后的结果。

样例

输入数据 1

5
0 2
0 4
1 3
1 2
1 5

输出数据 1

3

提示

• 传统题  1000ms  512MiB

• 说明

  最近，阿 Q 开了一间宠物收养所。收养所提供两种服务：收养被主人遗弃的宠物和让新的主人领养这些宠物。 每个领养者都希望领养到自己满意的宠物，阿 Q 根据领养者的要求通过他自己发明的一个特殊的公式，得出该领养者希望领养的宠物的特点值 a（a 是一个正整数，a<），而他也给每个处在收养所的宠物一个特点值，这样他就能够很方便的处理整个领养宠物的过程了。 宠物收养所总是会有两种情况发生：被遗弃的宠物过多或者是想要收养宠物的人太多，而宠物太少：

• 被遗弃的宠物过多时，假若到来一个领养者，这个领养者希望领养的宠物的特点值为 a，那么它将会领养一只目前未被领养的宠物中特点值最接近 a 的一只宠物。任何两只宠物的特点值都不可能是相同的，任何两个领养者的希望领养宠物的特点值也不可能是一样的。如果有两只满足要求的宠物，即存在两只宠物他们的特点值分别为 a−b 和 a+b，那么领养者将会领养特点值为 a−b 的那只宠物；
• 收养宠物的人过多，假若到来一只被收养的宠物，那么哪个领养者能够领养它呢？能够领养它的领养者，是那个希望被领养宠物的特点值最接近该宠物特点值的领养者，如果该宠物的特点值为 a，存在两个领养者他们希望领养宠物的特点值分别为 a−b 和 a+b，那么特点值为 a−b 的那个领养者将成功领养该宠物。一个领养者领养了一个特点值为 a 的宠物，而它本身希望领养的宠物的特点值为 b，那么这个领养者的不满意程度为 ∣a−b∣。 你得到了一年当中，领养者和被收养宠物到来收养所的情况，希望你计算所有收养了宠物的领养者的不满意程度的总和。这一年初始时，收养所里面既没有宠物，也没有领养者。
• 数据范围：对于全部数据，有 1≤n≤8×。

• #include<bits/stdc++.h>
  using namespace std;
  struct S{
  	int lc,rc,vis,pos,cnt,sze;
  }t[500005];int n,m,cnt=0,rt=0;
  void zig(int &k){
  	int y=t[k].lc;
  	t[k].lc=t[y].rc;
  	t[y].rc=k;
  	t[y].sze=t[k].sze;
  	t[k].sze=t[t[k].lc].sze+t[t[k].rc].sze+t[k].cnt;
  	k=y;
  }
  void zag(int &k){
  	int y=t[k].rc;
  	t[k].rc=t[y].lc;
  	t[y].lc=k;
  	t[y].sze=t[k].sze;
  	t[k].sze=t[t[k].lc].sze+t[t[k].rc].sze+t[k].cnt;
  	k=y;
  }
  void inse(int &k,int key){
  	if(!k){
  		k=++cnt;t[k].vis=key;t[k].pos=rand();
  		t[k].cnt=t[k].sze=1;t[k].lc=t[k].rc=0;
  		return ;
  	}
  	else ++t[k].sze;
  	if(t[k].vis==key)++t[k].cnt;
  	else if(key<t[k].vis){
  		inse(t[k].lc,key);
  		if(t[t[k].lc].pos<t[k].pos)zig(k);
  	}
  	else {
  		inse(t[k].rc,key);
  		if(t[t[k].rc].pos<t[k].pos)zag(k);
  	}
  	return ;
  }
  void del(int &k,int key){
  	if(t[k].vis==key){
  		if(t[k].cnt>1)--t[k].cnt,--t[k].sze;
  		else if(!t[k].lc || !t[k].rc)k=t[k].lc+t[k].rc;
  		else if(t[t[k].lc].pos<t[t[k].rc].pos)zig(k),del(k,key);
  		else zag(k),del(k,key);
  		return ;
  	}
  	--t[k].sze;
  	if(key<t[k].vis)del(t[k].lc,key);
  	else del(t[k].rc,key);
  }
  int quepre(int key){
  	int k=rt,res=-0x3f3f3f3f;
  	while(k){
  		if(t[k].vis<key)res=t[k].vis,k=t[k].rc;
  		else k=t[k].lc;
  	}
  	return res;
  }
  int quenex(int key){
  	int k=rt,nex=0x3f3f3f3f;
  	while(k){
  		if(t[k].vis>=key)nex=t[k].vis,k=t[k].lc;
  		else k=t[k].rc;
  	}
  	return nex;
  }
  int main(){
  	int n,zz,cn1=0,cn2=0;
  	int op=0,xn,bn;
  	scanf("%d",&n);
  	for(int i=1;i<=n;i++)
  	{
  	    scanf("%d%d",&xn,&bn);
  	    if(xn==0)
  	    {
  	    	if(cn2==0)
  	    	{
  	    		inse(rt,bn);
  	    		cn1++;
  			}
  			else
  			{
  				cn2--;
  				int xx=quepre(bn);
  				int yy=quenex(bn);
  				if(abs(bn-xx)>abs(bn-yy))
  				{
  					int zz=abs(yy-bn);
  					op+=zz;op%=1000000;
  					del(rt,yy);
  				}
  				else
  				{
  					int zz=abs(xx-bn);
  					op+=zz;op%=1000000;
  					del(rt,xx);
  				}
  			}
  			
  		}
  		if(xn==1)
  	    {
  	    	if(cn1==0)
  	    	{
  	    		inse(rt,bn);
  	    		cn2++;
  			}
  			else
  			{
  				cn1--;
  				int xx=quepre(bn);
  				int yy=quenex(bn);
  				if(abs(bn-xx)>abs(bn-yy))
  				{
  					int zz=abs(yy-bn);
  					op+=zz;op%=1000000;
  					del(rt,yy);
  				}
  				else
  				{
  					int zz=abs(xx-bn);
  					op+=zz;
  					op%=1000000;
  					del(rt,xx);
  				}
  			}
  			
  		}
  	}
  	printf("%d",op%1000000);
  	return 0;
  }