一开始写残了。。
1 program hehe; 2 type 3 shu=record 4 l,r,h,w,s,y:longint; 5 end; 6 var 7 c:char; 8 leave,add,min,size,root,n,i,j,k:longint; 9 x:array[0..100000] of shu; 10 11 procedure update(a:longint); 12 begin 13 x[a].s:=x[x[a].l].s+x[x[a].r].s+x[a].w; 14 end; 15 16 procedure lturn(var a:longint); 17 var 18 t:longint; 19 begin 20 t:=x[a].r; 21 x[a].r:=x[t].l; 22 x[t].l:=a; 23 x[t].s:=x[a].s; 24 update(a); 25 a:=t; 26 end; 27 28 procedure rturn(var a:longint); 29 var 30 t:longint; 31 begin 32 t:=x[a].l; 33 x[a].l:=x[t].r; 34 x[t].r:=a; 35 x[t].s:=x[a].s; 36 update(a); 37 a:=t; 38 end; 39 40 procedure insert(var a:longint;b:longint); 41 begin 42 if a=0 then 43 begin 44 inc(size); 45 a:=size; 46 x[a].s:=1; 47 x[a].w:=1; 48 x[a].h:=b; 49 x[a].y:=random(maxlongint); 50 exit; 51 end; 52 inc(x[a].s); 53 if x[a].h=b then 54 begin 55 inc(x[a].w); 56 exit; 57 end; 58 if b>x[a].h then 59 begin 60 insert(x[a].r,b); 61 if x[x[a].r].y<x[a].y then lturn(a); 62 exit; 63 end; 64 insert(x[a].l,b); 65 if x[x[a].l].y<x[a].y then rturn(a); 66 end; 67 68 function delete(var a:longint;b:longint):longint; 69 var 70 t:longint; 71 begin 72 if a=0 then exit(0); 73 if x[a].h<b then 74 begin 75 t:=x[x[a].l].s+x[a].w; 76 a:=x[a].r; 77 exit(t+delete(a,b)); 78 end; 79 t:=delete(x[a].l,b); 80 x[a].s:=x[a].s-t; 81 exit(t); 82 end; 83 84 function find(a,b:longint):longint; 85 begin 86 if x[x[a].l].s+x[a].w<b then exit(find(x[a].r,b-x[x[a].l].s-x[a].w)); 87 if x[x[a].l].s>=b then exit(find(x[a].l,b)); 88 exit(x[a].h+add); 89 end; 90 91 begin 92 readln(n,min); 93 for i:=1 to n do 94 begin 95 read(c); 96 readln(k); 97 case c of 98 ‘I‘:if k>=min then insert(root,k-add); 99 ‘A‘:add:=add+k; 100 ‘S‘:begin 101 add:=add-k; 102 leave:=leave+delete(root,min-add); 103 end; 104 ‘F‘:if x[root].s<k then writeln(‘-1‘) 105 else writeln(find(root,x[root].s-k+1)); 106 end; 107 end; 108 writeln(leave); 109 end.
1503: [NOI2004]郁闷的出纳员
Time Limit: 5 Sec Memory Limit: 64 MB
Submit: 7591 Solved: 2661
[Submit][Status][Discuss]
Description
OIER公司是一家大型专业化软件公司，有着数以万计的员工。作为一名出纳员，我的任务之一便是统计每位员工的工资。这本来是一份不错的工作，但是令人郁闷的是，我们的老板反复无常，经常调整员工的工资。如果他心情好，就可能把每位员工的工资加上一个相同的量。反之，如果心情不好，就可能把他们的工资扣除一个相同的量。我真不知道除了调工资他还做什么其它事情。工资的频繁调整很让员工反感，尤其是集体扣除工资的时候，一旦某位员工发现自己的工资已经低于了合同规定的工资下界，他就会立刻气愤地离开公司，并且再也不会回来了。每位员工的工资下界都是统一规定的。每当一个人离开公司，我就要从电脑中把他的工资档案删去，同样，每当公司招聘了一位新员工，我就得为他新建一个工资档案。老板经常到我这边来询问工资情况，他并不问具体某位员工的工资情况，而是问现在工资第k多的员工拿多少工资。每当这时，我就不得不对数万个员工进行一次漫长的排序，然后告诉他答案。好了，现在你已经对我的工作了解不少了。正如你猜的那样，我想请你编一个工资统计程序。怎么样，不是很困难吧？
Input
Output
输出文件的行数为F命令的条数加一。对于每条F命令，你的程序要输出一行，仅包含一个整数，为当前工资第k多的员工所拿的工资数，如果k大于目前员工的数目，则输出-1。输出文件的最后一行包含一个整数，为离开公司的员工的总数。
Sample Input
9 10
I 60
I 70
S 50
F 2
I 30
S 15
A 5
F 1
F 2
Sample Output
10
20
-1
2
HINT
I命令的条数不超过100000 A命令和S命令的总条数不超过100 F命令的条数不超过100000 每次工资调整的调整量不超过1000 新员工的工资不超过100000