【bzoj2947】[Poi2000]促销

2947: [Poi2000]促销

Time Limit: 10 Sec  Memory Limit: 128 MB
Submit: 181  Solved: 120
[Submit][Status][Discuss]

Description

Bytelandish连锁超市委托你编写一个程序来模拟一项即将施行的促销活动，该活动的规则如下： 
●想要参与的顾客，只需把他的个人资料写在帐单上，并把帐单放入投票箱； 
●每天活动结束时，数额最大、最小的两张帐单被取出，付款数额最大的顾客将获得一笔奖金，价值为取出的两张帐单的数额之差； 
●为了不重复计算，取出的两张帐单不再放回箱子，而剩下的帐单仍保留在箱中，进行第二天的活动。 
超市每天的营业额很大，因此可假定：每天活动结束时，箱中至少有两张帐单以供取出。 
你的任务是根据每天投入箱中的帐单，计算出这项促销活动期间超市付出的奖金总数额。 
任务： 
编写一个程序，完成下列工作： 
●读入投入箱中的帐单的信息； 
●算出促销活动期间的奖金总额； 

Input

第一行是一个整数 n（1 <= n <= 5000），表示促销活动历时的天数。

以下的n行，每行包含若干由空格分隔的非负整数。第i+1行的数表示在第i天投入箱子的账单金额。每行的第一行是一个整数k（0 <= k <= 10⁵）， 表示当日账单的数目。后面的k个正整数代表这k笔账单的金额，均小于10⁶。

整个活动中涉及到的账单笔数不会超过10⁶ 。

Output

唯一一行是一个整数，等于整个促销活动中应该付出的奖金总额。

 

Sample Input

5
3 1 2 3
2 1 1
4 10 5 5 1
0
1 2

Sample Output

19

 

 

 

 

 

【题解】

平衡树裸题，据说可以各种水过

#include<iostream>
#include<cstdio>
#include<cstring>
#include<cstdlib>
#include<ctime>
#include<cmath>
#include<algorithm>
using namespace std;
typedef long long ll;
struct data{ll l,r,v,size,fix,w;}tr[1000005];
ll T,rt,ans,len;
char buf[1<<15],*fs,*ft;
inline char getc() {return (fs==ft&&(ft=(fs=buf)+fread(buf,1,1<<15,stdin),fs==ft))?0:*fs++;}
inline ll read()
{
    ll x=0,f=1;  char ch=getc();
    while(!isdigit(ch))  {if(ch=='-')  f=-1;  ch=getc();}
    while(isdigit(ch))  {x=x*10+ch-'0';  ch=getc();}
    return x*f;
}
void update(ll k){tr[k].size=tr[tr[k].l].size+tr[tr[k].r].size+tr[k].w;}
void rturn(ll &k){ll t=tr[k].l;tr[k].l=tr[t].r;tr[t].r=k;tr[t].size=tr[k].size;update(k);k=t;}
void lturn(ll &k){ll t=tr[k].r;tr[k].r=tr[t].l;tr[t].l=k;tr[t].size=tr[k].size;update(k);k=t;}
void insert(ll &k,ll x)
{
    if(k==0){len++;k=len;tr[k].size=tr[k].w=1;tr[k].v=x;tr[k].fix=rand();return;}
    tr[k].size++;
    if(tr[k].v==x)tr[k].w++;
    else if(x>tr[k].v){insert(tr[k].r,x);if(tr[tr[k].r].fix<tr[k].fix)lturn(k);}
    else {insert(tr[k].l,x);if(tr[tr[k].l].fix<tr[k].fix)rturn(k);} 
}
void del(ll &k,ll x)
{
    if(k==0)return; 
    if(tr[k].v==x)
    {
        if(tr[k].w>1){tr[k].w--;tr[k].size--;return;}
        if(tr[k].l*tr[k].r==0)k=tr[k].l+tr[k].r;//有一个儿子为空
        else if(tr[tr[k].l].fix<tr[tr[k].r].fix) rturn(k),del(k,x);
        else lturn(k),del(k,x);
    }
    else if(x>tr[k].v) tr[k].size--,del(tr[k].r,x);
    else tr[k].size--,del(tr[k].l,x);
}
ll minn(ll p) {while(tr[p].l)  p=tr[p].l;return tr[p].v;}
ll maxx(ll p) {while(tr[p].r)  p=tr[p].r;return tr[p].v;}
int main()
{
    //freopen("cin.in","r",stdin);
    //freopen("cout.out","w",stdout);
    T=read();
    while(T--)
    {
        ll n=read();
        for(ll i=1;i<=n;i++)  {ll x=read();  insert(rt,x);}
        ll temp1=minn(rt),temp2=maxx(rt);
        ans+=temp2-temp1;
        del(rt,temp2);  del(rt,temp1);
    }
    printf("%lld\n",ans);
    return 0;
}