洛谷P2286 [HNOI2004]宠物收养场

题目描述

凡凡开了一间宠物收养场。收养场提供两种服务：收养被主人遗弃的宠物和让新的主人领养这些宠物。

每个领养者都希望领养到自己满意的宠物，凡凡根据领养者的要求通过他自己发明的一个特殊的公式，得出该领养者希望领养的宠物的特点值a（a是一个正整数，a<2^31），而他也给每个处在收养场的宠物一个特点值。这样他就能够很方便的处理整个领养宠物的过程了，宠物收养场总是会有两种情况发生：被遗弃的宠物过多或者是想要收养宠物的人太多，而宠物太少。

被遗弃的宠物过多时，假若到来一个领养者，这个领养者希望领养的宠物的特点值为a，那么它将会领养一只目前未被领养的宠物中特点值最接近a的一只宠物。（任何两只宠物的特点值都不可能是相同的，任何两个领养者的希望领养宠物的特点值也不可能是一样的）如果有两只满足要求的宠物，即存在两只宠物他们的特点值分别为a-b和a+b，那么领养者将会领养特点值为a-b的那只宠物。

收养宠物的人过多，假若到来一只被收养的宠物，那么哪个领养者能够领养它呢？能够领养它的领养者，是那个希望被领养宠物的特点值最接近该宠物特点值的领养者，如果该宠物的特点值为a，存在两个领养者他们希望领养宠物的特点值分别为a-b和a+b，那么特点值为a-b的那个领养者将成功领养该宠物。

一个领养者领养了一个特点值为a的宠物，而它本身希望领养的宠物的特点值为b，那么这个领养者的不满意程度为abs(a-b)。

你得到了一年当中，领养者和被收养宠物到来收养所的情况，请你计算所有收养了宠物的领养者的不满意程度的总和。这一年初始时，收养所里面既没有宠物，也没有领养者。

输入输出格式

输入格式：

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

输出格式：

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

输入输出样例

输入样例#1： 

5                  
0 2                      
0 4                         
1 3
1 2
1 5

输出样例#1： 

3
注：abs(3-2) + abs(2-4)=3，
最后一个领养者没有宠物可以领养。

平衡树经典好题，打一发模板即可。

Treap 大法。。。

注意：要不停更换树中存储的值是 宠物 还是 人。。。

附代码：

#include<iostream>
#include<algorithm>
#include<cstdio>
#include<ctime>
#define MAX 999999999
#define MOD 1000000
using namespace std;
int n,m=0,answer=0,pod=0;
struct node{
	node* son[2];
	int v,w,s,flag;
	node(){
		son[0]=son[1]=NULL;
		w=rand();
		v=0;
		s=flag=1;
	}
};
node* rt;
inline int read(){
	int date=0,w=1;char c=0;
	while(c<'0'||c>'9'){if(c=='-')w=-1;c=getchar();}
	while(c>='0'&&c<='9'){date=date*10+c-'0';c=getchar();}
	return date*w;
}
inline int abs(int a){if(a<0)return -a;return a;}
void maintain(node* &u){
	u->s=u->flag;
	if(u->son[0]!=NULL)u->s+=u->son[0]->s;
	if(u->son[1]!=NULL)u->s+=u->son[1]->s;
}
void turn(node* &u,int f){
	node* t=u->son[f^1];
	u->son[f^1]=t->son[f];
	t->son[f]=u;
	maintain(u);
	maintain(t);
	u=t;
}
void insert(node* &u,int x){
	if(u==NULL){
		u=new node;
		u->v=x;
		return;
	}
	else if(u->v==x){
		u->flag++;
		maintain(u);
		return;
	}
	int y=x>u->v?1:0;
	insert(u->son[y],x);
	if(u->son[y]->w>u->w)turn(u,y^1);
	else maintain(u);
}
void remove(node* &u,int x){
	if(u==NULL)return;
	if(u->v==x){
		if(u->flag>1)u->flag--;
		else{
			if(u->son[0]==NULL&&u->son[1]==NULL)u=NULL;
			else if(u->son[0]!=NULL&&u->son[1]!=NULL){
				if(u->son[0]->w>u->son[1]->w){
					turn(u,1);
					remove(u->son[1],x);
				}
				else{
					turn(u,0);
					remove(u->son[0],x);
				}
			}
			else{
				if(u->son[0]==NULL)u=u->son[1];
				else u=u->son[0];
			}
		}
		if(u!=NULL)maintain(u);
	}
	else{
		if(x<u->v)remove(u->son[0],x);
		else if(x>u->v)remove(u->son[1],x);
		if(u!=NULL)maintain(u);
	}
}
void front(node* u,int k,int &ans){
	if(u==NULL)return;
	if(u->v<k){
		if(u->v>ans)ans=u->v;
		if(u->son[1]!=NULL)front(u->son[1],k,ans);
	}
	else if(u->v==k){
		if(u->flag>=1)ans=u->v;
		else if(u->son[0]!=NULL)front(u->son[0],k,ans);
	}
	else if(u->v>k)
	if(u->son[0]!=NULL)front(u->son[0],k,ans);
}
void next(node* u,int k,int &ans){
	if(u==NULL)return;
	if(u->v>k){
		if(u->v<ans)ans=u->v;
		if(u->son[0]!=NULL)next(u->son[0],k,ans);
	}
	else if(u->v==k){
		if(u->flag>=1)ans=u->v;
		else if(u->son[1]!=NULL)front(u->son[1],k,ans);
	}
	else if(u->v<k)
	if(u->son[1]!=NULL)next(u->son[1],k,ans);
}
int main(){
	int f,x;
	srand(987);
	n=read();
	for(int cases=1;cases<=n;cases++){
		f=read();x=read();
		if(f==pod){
			insert(rt,x);
			m++;
		}
		else if(m){
			int s1=-MAX,s2=MAX;
			front(rt,x,s1);next(rt,x,s2);
			if(abs(s1-x)>abs(s2-x)){
				answer+=abs(s2-x);
				remove(rt,s2);
				m--;
			}
			else{
				answer+=abs(s1-x);
				remove(rt,s1);
				m--;
			}
		}
		else{
			pod^=1;
			insert(rt,x);
			m++;
		}
		answer%=MOD;
	}
	printf("%d\n",answer%MOD);
	return 0;
}