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以后的结果。

点击查看代码

#include <cstdio>
#include <cstring>
#include <cstdlib>
#include <algorithm>
using namespace std;
const int N = 1e5;
const int mod = 1e6;
int n, ans;
int type;
const int MAX_LEVEL = 30;
struct node
{
    int key;
    int next[MAX_LEVEL + 5];
} sl[N + 10];
int node_tot, head, tail, size;
int st[N + 10], top;
int rand_level()
{
    int ret = 1;
    while (rand() % 2 && ret < MAX_LEVEL)
    {
        ++ret;
    }
    return ret;
}
void new_node(int &p, int key = 0)
{
    if (top)
    {
        p = st[top--];
    }
    else
    {
        p = ++node_tot;
    }
    sl[p].key = key;
    ++size;
}
void free_node(int p)
{
    st[++top] = p;
    --size;
}
void init()
{
    new_node(head, -0x3f3f3f3f), new_node(tail, 0x3f3f3f3f);
    for (int i = 1; i <= MAX_LEVEL; ++i)
    {
        sl[head].next[i] = tail;
    }
}
void insert(int key)
{
    int p = head;
    int update[MAX_LEVEL + 5];
    int k = rand_level();
    for (int i = MAX_LEVEL; i; --i)
    {
        while (sl[p].next[i] ^ tail && sl[sl[p].next[i]].key < key)
        {
            p = sl[p].next[i];
        }
        update[i] = p;
    }
    int temp;
    new_node(temp, key);
    for (int i = k; i; --i)
    {
        sl[temp].next[i] = sl[update[i]].next[i];
        sl[update[i]].next[i] = temp;
    }
}
void erase(int key)
{
    int p = head;
    int update[MAX_LEVEL + 5];
    for (int i = MAX_LEVEL; i; --i)
    {
        while (sl[p].next[i] ^ tail && sl[sl[p].next[i]].key < key)
        {
            p = sl[p].next[i];
        }
        update[i] = p;
    }
    free_node(sl[p].next[1]);
    for (int i = MAX_LEVEL; i; --i)
    {
        if (sl[sl[update[i]].next[i]].key == key)
        {
            sl[update[i]].next[i] = sl[sl[update[i]].next[i]].next[i];
        }
    }
}
int lb(int key)
{
    int p = head;
    for (int i = MAX_LEVEL; i; --i)
    {
        while (sl[p].next[i] ^ tail && sl[sl[p].next[i]].key < key)
        {
            p = sl[p].next[i];
        }
    }
    return p; // lower_bound 结果 --
}
void answer(int x)
{
    int l = lb(x);
    int r = sl[l].next[1]; //迭代器 ++
    if (sl[l].key ^ -0x3f3f3f3f && x - sl[l].key <= sl[r].key - x)
    {
        ans = (ans + x - sl[l].key) % mod;
        erase(sl[l].key);
    }
    else
    {
        ans = (ans + sl[r].key - x) % mod;
        erase(sl[r].key);
    }
}
int main()
{
    srand(19260817);
    init();
    int x, y;
    scanf("%d", &n);
    while (n--)
    {
        scanf("%d%d", &x, &y);
        if (size == 2)
        {
            type = x, insert(y);
        }
        else if (x == type)
        {
            insert(y);
        }
        else
        {
            answer(y);
        }
    }
    printf("%d\n", ans);
}