[Treap]宠物收养场

题目描述

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

每个领养者都希望领养到自己满意的宠物，凡凡根据领养者的要求通过他自己发明的一个特殊的公式，得出该领养者希望领养的宠物的特点值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以后的结果。

输入输出样例

输入样例#
5
0 2
0 4
1 3
1 2
1 5
输出样例
3
注：abs(3-2) + abs(2-4)=3，
最后一个领养者没有宠物可以领养。

题目分析

容易想到建两棵平衡树，一棵宠物树，一棵人树
但是这样有点浪费（其实是没做出来气的）
然后想到一颗平衡树，很明显只会有五种情况：
树是空的：直接加入
人来了，树里面是人，加入
宠物同上
人来了，树里面是宠物，取出，删除
宠物同上
那么我们只需要一个petcnt计算树里面的宠物数量即可（人是-1）
然后。。我还是错的
我想了约30+min
最后发现，是——
取余少了一个0

[DEV CPP已成功从你的计算机删除]

#include <iostream>
#include <cstdio>
#include <ctime>
#include <cstdlib>
#define rep(i,a,b) for (i=a;i<=b;i++)
using namespace std;
struct node
{
    int l,r;
    int key,size;
    int data,cnt;
}t[80001];
int cnt,rt;

void UPDATE(int x)
{
    t[x].size=t[t[x].l].size+t[t[x].r].size+1;
}

void RIGHT_ROTATE(int &x)
{
    int y=t[x].l;
    t[x].l=t[y].r;t[y].r=x;
    UPDATE(x);UPDATE(y);
    x=y;
}

void LEFT_ROTATE(int &x)
{
    int y=t[x].r;
    t[x].r=t[y].l;t[y].l=x;
    UPDATE(x);UPDATE(y);
    x=y;
}

void INSERT(int &x,int data)
{
    if (t[x].data==data)
    {
        t[x].cnt++;
        return;
    }
    if (x==0)
    {
        x=++cnt;
        t[x].size=1;
        t[x].data=data;
        t[x].key=rand();
        t[x].cnt++;
        return;
    }
    if (data<t[x].data)
    {
        INSERT(t[x].l,data);
        if (t[t[x].l].key>t[x].key) RIGHT_ROTATE(x);
    }
    else
    {
        INSERT(t[x].r,data);
        if (t[t[x].r].key>t[x].key) LEFT_ROTATE(x);
    }
    UPDATE(x);
}

void DELETE(int &x,int data)
{
    if (x==0) return;
    if (t[x].data==data)
    {
        if (t[x].cnt)
        t[x].cnt--;
        if (!t[x].cnt)
        if (t[x].l||t[x].r)
        {
            if (t[x].l&&(!t[x].r||t[t[x].l].key<t[t[x].r].key))
            {
                RIGHT_ROTATE(x);
                DELETE(t[x].r,data);
            }
            else
            {
                LEFT_ROTATE(x);
                DELETE(t[x].l,data);
            }
            UPDATE(x);
        }
        else x=0;
        return;
    }
    if (data<t[x].data) DELETE(t[x].l,data);
    else DELETE(t[x].r,data);
    UPDATE(x);
}

int GET_PRE(int data)
{
    int x=rt;
    int ans=-2147483647;
    while (x)
    {
        if (t[x].data<=data)
        {
            ans=max(ans,t[x].data);
            x=t[x].r;
        }
        else x=t[x].l;
    }
    return ans;
}

int GET_NEXT(int data)
{
    int x=rt;
    int ans=2147483647;
    while (x)
    {
        if (t[x].data>=data)
        {
            ans=min(ans,t[x].data);
            x=t[x].l;
        }
        else x=t[x].r;
    }
    return ans;
}

int main()
{
    int n,i;
    int a,b,petcnt=0;
    int ans=0;
    scanf("%d",&n);
    rep(i,1,n)
    {
        scanf("%d%d",&a,&b);
        if (a)
        {
            if (petcnt<=0)
            {
                INSERT(rt,b);
                petcnt--;
            }
            if (petcnt>0)
            {
                long long x=GET_PRE(b),y=GET_NEXT(b);
                if (b-x>y-b)
                {
                    ans=(ans+(y-b)%1000000)%1000000;
                    DELETE(rt,y);
                }
                else
                {
                    ans=(ans+(b-x)%1000000)%1000000;
                    DELETE(rt,x);
                }
                petcnt--;
            }
        }
        else
        {
            if (petcnt>=0)
            {
                INSERT(rt,b);
                petcnt++;
            }
            if (petcnt<0)
            {
                long long x=GET_PRE(b),y=GET_NEXT(b);
                if (b-x>y-b)
                {
                    ans=(ans+(y-b)%1000000)%1000000;
                    DELETE(rt,y);
                }
                else
                {
                    ans=(ans+(b-x)%1000000)%1000000;
                    DELETE(rt,x);
                }
                petcnt++;
            }
        }
    }
    printf("%d",ans);
}