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加上找前驱后继节点可以AC。
首先，建一棵Treap保存狗或人，每次在里面找一个最近的抵消（通过找前驱后继来实现），其他的看题都知道怎么处理。
那么重点来了，特别是像我这样没用Treap找过前驱后继的注意了，前驱后继的实现。
前驱：
定义变量p1，用来保存前驱最近的节点。
从根开始（显然），如果需要的编号小于当前编号，就往前走（走左儿子），否则p1=当前编号，往右走。
实现如下：

void front(node* r,int key)
{
    if(!r)
        return;
    if(r->key>key)
        front(r->child[0],key);
    else
        p1=r->key,front(r->child[1],key);
}

最后，附上全部代码：

#include<iostream>
#include<cstdio>
#include<cstdlib>
#include<queue>
#include<ctime>
using namespace std;
int read()
{
    int x=0,y=1;
    char ch=getchar();
    while(ch<'0'||ch>'9')
    {
        if(ch=='-')
            y=-1;
        ch=getchar();
    }
    while(ch>='0'&&ch<='9')
    {
        x=x*10+ch-'0';
        ch=getchar();
    }
    return x*y;
}
struct node
{
    int key,lev;
    node* child[2];
} Treap[100045],*pos,*root;
queue<node*>mem;
int p1,p2;
void newnode(node* &r,int key)
{
    if(mem.empty())
        r=pos++;
    else
        r=mem.front(),mem.pop();
    r->key=key;
    r->lev=rand();
    r->child[0]=r->child[1]=0;
}
void roll(node* &r,bool t)
{
    node* y=r->child[!t];
    r->child[!t]=y->child[t];
    y->child[t]=r;
    r=y;
}
void insert(node* &r,int key)
{
    if(!r)
        newnode(r,key);
    else
    {
        bool t=r->key<key;
        insert(r->child[t],key);
        if(r->child[t]->lev<r->lev)
            roll(r,!t);
    }
}
void dele(node* &r,int key)
{
    if(!r)
        return;
    if(r->key==key)
    {
        if(r->child[0]&&r->child[1])
        {
            bool t=r->child[1]->lev>r->child[0]->lev;
            roll(r,t);
            dele(r->child[t],key);
        }
        else
        {
            mem.push(r);
            if(r->child[0])
                r=r->child[0];
            else
                r=r->child[1];
        }
    }
    else
        dele(r->child[r->key<key],key);
}
void front(node* r,int key)
{
    if(!r)
        return;
    if(r->key>key)
        front(r->child[0],key);
    else
        p1=r->key,front(r->child[1],key);
}
void back(node* r,int key)
{
    if(!r)
        return;
    if(r->key<key)
        back(r->child[1],key);
    else
        p2=r->key,back(r->child[0],key);
}
int main()
{
    int n=read(),x,y,a=0,b=0,ans=0;
    pos=Treap;
    for(int i=1; i<=n; i++)
    {
        x=read(),y=read();
        if(x==0)
        {
            if(b==0)
            {
                insert(root,y);
                a++;
            }
            else
            {
                b--;
                p1=0,p2=0;
                front(root,y);
                back(root,y);
                if((y-p1<=p2-y&&p1!=0)||p2==0)
                {
                    ans=(ans+y-p1)%1000000;
                    dele(root,p1);
                }
                else
                {
                    ans=(ans+p2-y)%1000000;
                    dele(root,p2);
                }
            }
        }
        else
        {
            if(a==0)
            {
                insert(root,y);
                b++;
            }
            else
            {
                a--;
                p1=0,p2=0;
                front(root,y);
                back(root,y);
                if((y-p1<=p2-y&&p1!=0)||p2==0)
                {
                    ans=(ans+y-p1)%1000000;
                    dele(root,p1);
                }
                else
                {
                    ans=(ans+p2-y)%1000000;
                    dele(root,p2);
                }
            }
        }
    }
    printf("%d",ans);
    return 0;
}

//        FOR C.H

                                                                    PEACE！