HNOI2004宠物收养所(splay维护二叉搜索树模板题)

描述

最近，阿Q开了一间宠物收养所。收养所提供两种服务：收养被主人遗弃的宠物和让新的主人领养这些宠物。每个领养者都希望领养到自己满意的宠物，阿Q根据领养者的要求通过他自己发明的一个特殊的公式，得出该领养者希望领养的宠物的特点值a（a是一个正整数，a<2^31），而他也给每个处在收养所的宠物一个特点值。这样他就能够很方便的处理整个领养宠物的过程了，宠物收养所总是会有两种情况发生：被遗弃的宠物过多或者是想要收养宠物的人太多，而宠物太少。 1． 被遗弃的宠物过多时，假若到来一个领养者，这个领养者希望领养的宠物的特点值为a，那么它将会领养一只目前未被领养的宠物中特点值最接近a的一只宠物。（任何两只宠物的特点值都不可能是相同的，任何两个领养者的希望领养宠物的特点值也不可能是一样的）如果有两只满足要求的宠物，即存在两只宠物他们的特点值分别为a-b和a+b，那么领养者将会领养特点值为a-b的那只宠物。 2． 收养宠物的人过多，假若到来一只被收养的宠物，那么哪个领养者能够领养它呢？能够领养它的领养者，是那个希望被领养宠物的特点值最接近该宠物特点值的领养者，如果该宠物的特点值为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以后的结果。 

测试样例

输入

5 

0 2 
0 4 
1 3 
1 2 
1 5

输出

3

 

一道splay维护二叉搜索树的题。我写的这个splay有些常数略大

插入元素：从根节点向下找到这个数的位置直到找到一个空节点，就插入。

删除元素：将这个点转到根节点，判断一下是否为当前剩余元素中的最值，如果是的话就直接删除，否则就找到他的前驱（即根的左子树中最大的一个），将前驱的值赋给他然后将前驱删掉。

寻找元素：按照二叉搜索树的性质一直往下搜即可。

 

技巧：

在插入元素的时候，如果这个节点过深，那么就强行旋转一下这个点到根节点使得形态改变。(结果发现跑的巨快......)。

 

代码如下：

#include<algorithm>
#include<iostream>
#include<cstring>
#include<cstdio>
#include<cmath>
#define LL long long
#define mod 1000000
#define M 80010
using namespace std;
LL read(){
    LL nm=0,oe=1;char cw=getchar();
    while(!isdigit(cw)) oe=cw=='-'?-oe:oe,cw=getchar();
    while(isdigit(cw)) nm=nm*10+(cw-'0'),cw=getchar();
    return nm*oe;
}
LL n,m,ans,T,tpe,t,w;
struct binary_search_tree{
    LL ace,l[M],r[M],p[M],cnt,tp[M],sz;
    void init(){l[0]=r[0]=cnt=ace=sz=0,p[0]=tp[0];}
    void rotate(LL x){
        if(ace==x) return;
        LL top=tp[x];
        if(ace==top) tp[ace]=x,ace=x;
        else{
            if(l[tp[top]]==top) l[tp[top]]=x;
            else r[tp[top]]=x;
            tp[x]=tp[top],tp[top]=x;
        }
        if(l[top]==x) l[top]=r[x],tp[r[x]]=top,r[x]=top;
        else r[top]=l[x],tp[l[x]]=top,l[x]=top;
    }
    void splay(LL x){
        if(x==0) return;
        while(ace!=x){
            LL k=tp[x];
            if(k==ace) rotate(x);
            else if(l[l[tp[k]]]==x||r[r[tp[k]]]==x) rotate(k);
            else rotate(x);
        }
        return;
    }
    void del(LL x){
        sz--;
        if(x==0){return;}
        splay(x);
        if(l[x]==0&&r[x]==0){init();return;}
        if(l[x]==0) ace=r[x];
        else if(r[x]==0) ace=l[x];
        else{
            LL k=l[x];
            if(r[k]==0){l[ace]=l[k],tp[l[k]]=ace,p[ace]=p[k];return;}
            while(r[k]!=0) k=r[k];
            r[tp[k]]=l[k],tp[l[k]]=tp[k],p[ace]=p[k];
        }
    }
    void insert(LL x){
        sz++;
        if(ace==0){p[++cnt]=x,ace=cnt,l[cnt]=r[cnt]=0;return;}
        LL pos=ace,big=0;
        while(pos!=0){
            if(p[pos]<=x){
                if(r[pos]==0){r[pos]=++cnt,p[cnt]=x,tp[cnt]=pos;break;}
                pos=r[pos];
            }
            else{
                if(l[pos]==0){l[pos]=++cnt,p[cnt]=x,tp[cnt]=pos;break;}
                pos=l[pos];
            }
            big++;
        }
        l[cnt]=r[cnt]=0;
        if(big>=30) splay(cnt);
    }
    LL find(LL x){
        LL k=ace,len=99999999999999ll,num=ace;
        while(true){
            if(k==0) break;
            if(p[k]==x) return k;
            if(p[k]>x){
                if(len>p[k]-x) len=p[k]-x,num=k;
                k=l[k];
            }
            else{
                if(len>=x-p[k]) len=x-p[k],num=k;
                k=r[k];
            }
        }
        return num;
    }
}pet,hum;
LL ab(LL x){return x>0?x:-x;}
int main(){
    pet.init(),hum.init();
    T=read();
    while(T--){
        tpe=read(),t=read();
        if(tpe==0){
            if(hum.ace==0) pet.insert(t);
            else{
                w=hum.find(t);
                ans+=ab(t-hum.p[w]);
                hum.del(w);
            }
        }
        else{
            if(pet.ace==0) hum.insert(t);
            else{
                w=pet.find(t);
                ans+=ab(t-pet.p[w]);
                pet.del(w);
            }
        }
    }
    printf("%lld
",ans%mod);
    return 0;
}