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，
最后一个领养者没有宠物可以领养。

Solution：

 　　本题Splay板子题（真码农！）。

　　分析题目：

　　　　1、保证宠物中没有同一数字，人中没有同一数字，那么就不用开个什么域计数了。

　　　　2、宠物的领养条件是宠物个数大于人的个数，宠物选择主人的条件是人的个数大于宠物个数，两者本质是一样的，所以可以各用一棵splay维护，结构体封装一下splay就好了。

　　　　3、由上面2，我们可以只讨论一种累加答案的情况，以宠物被领养为例：我们找到当前人的期望值在宠物的那棵splay中的前趋和后继，然后取其中与期望值相差小的节点，累加答案，并将该节点删除（some细节在码的时候需要注意一下）。

　　那么本题就愉快的结束了。

代码：

/*Code by 520 -- 9.18*/
#include<bits/stdc++.h>
#define il inline
#define ll long long
#define RE register
#define For(i,a,b) for(RE int (i)=(a);(i)<=(b);(i)++)
#define Bor(i,a,b) for(RE int (i)=(b);(i)>=(a);(i)--)
#define son(x) (x==ch[fa[x]][1])
using namespace std;
const int N=100005,mod=1e6;
int n,ta,tb;
ll ans;
struct node{
    int root,cnt,ch[N][2],fa[N],siz[N],date[N];
    il void Clr(){
        root=0,cnt=0,memset(ch,0,sizeof(ch)),
        memset(fa,0,sizeof(fa)),memset(siz,0,sizeof(siz));
    }
    il void Pushup(int rt){siz[rt]=siz[ch[rt][0]]+siz[ch[rt][1]];}
    il void Rotate(int x){
        int y=fa[x],z=fa[y],b=son(x),c=son(y),a=ch[x][!b];
        z?ch[z][c]=x:root=x; fa[x]=z;
        if(a) fa[a]=y; ch[y][b]=a;
        fa[y]=x,ch[x][!b]=y;
        Pushup(y),Pushup(x);
    }
    il void Splay(int x,int i){
        while(fa[x]!=i){
            RE int y=fa[x],z=fa[y];
            if(z==i) Rotate(x);
            else {
                if(son(x)==son(y)) Rotate(y),Rotate(x);
                else Rotate(x),Rotate(x);
            }
        }
    }
    void Insert(int &rt,int x){
        if(!rt) {rt=++cnt,date[cnt]=x,siz[cnt]=1;return;}
        if(x<date[rt]) Insert(ch[rt][0],x),fa[ch[rt][0]]=rt;
        else Insert(ch[rt][1],x),fa[ch[rt][1]]=rt;
        Pushup(rt);
    }
    il int Pre(int rt,int x){
        int p=rt,ans=0;
        while(p){
            if(x==date[p]) return p;
            if(x<date[p]) p=ch[p][0];
            else ans=p,p=ch[p][1];
        }
        return ans;
    }
    il int Suc(int rt,int x){
        int p=rt,ans=0;
        while(p){
            if(x==date[p]) return p;
            if(x>date[p]) p=ch[p][1];
            else ans=p,p=ch[p][0];
        }
        return ans;
    }
    il int Min(int rt){
        int p=rt,ans=-1;
        while(p) ans=p,p=ch[p][0];
        return ans;
    }
    il void Del(int rt){
        Splay(rt,0);
        int p=Min(ch[rt][1]);
        if(~p) {
            Splay(p,rt);
            root=p,fa[p]=0;
            ch[p][0]=ch[rt][0],fa[ch[rt][0]]=p;
            Pushup(p);
        }
        else root=ch[rt][0],fa[ch[rt][0]]=0;
    }
    il int solve(int x){
        int tp1=Pre(root,x),tp2=Suc(root,x);
        if(!tp1||tp2&&x-date[tp1]>date[tp2]-x) {
            Del(tp2);
            return date[tp2]-x;
        }
        Del(tp1); return x-date[tp1];
    }
}a,b;

int gi(){
    int a=0;char x=getchar();
    while(x<'0'||x>'9') x=getchar();
    while(x>='0'&&x<='9') a=(a<<3)+(a<<1)+(x^48),x=getchar();
    return a;
}

int main(){
    n=gi();
    int opt,x;
    a.Clr(),b.Clr();
    while(n--){
        opt=gi(),x=gi();
        if(!opt) {
            if(!tb) a.Insert(a.root,x),a.Splay(a.cnt,0),ta++;
            else ans=(ans+b.solve(x))%mod,tb--;
        }
        else {
            if(!ta) b.Insert(b.root,x),b.Splay(b.cnt,0),tb++;
            else ans=(ans+a.solve(x))%mod,ta--;
        }
    }
    cout<<ans;
    return 0;
}