noip2011聪明的质检员

二分W+check=.=

由于让绝对值最小所以会有以下两种情况：

1、check>s 那么就说明我们的check还可以更小也就是W还可以更大->l:=mid+1

2、check<s 那么就说明我们的check还可以更大也就是W还可以更小->r:=mid-1

关键是check怎么算0.0

如果直接暴力枚举每个区间和每个区间的每个w去比较的话O(nm)，50%，50分=。=

然后就要把它优化到O（n） 或 O（m） 

用什么呢？

一看是连续的区间查询，再一看公式（满足要求的个数和*满足要求的价值和），那必是用前缀和0.0

前缀和O（n) 处理

于是就A了（这就差了50分=A=）

注意最后结果可能相差很大，注意开long long（int64）

var        n,m,ll,rr,mid   :longint;        i               :longint;        s,sum,ans       :int64;        w,a             :array[0..200010] of longint;        tot             :array[0..200010] of longint;        v               :array[0..200010] of int64;        l,r             :array[0..200010] of longint;function check(x:longint):int64;var        i:longint;        ans:int64;begin   tot[0]:=0;v[0]:=0;   for i:=1 to n do   begin      tot[i]:=tot[i-1];v[i]:=v[i-1];      if (w[i]>=x) then      begin         inc(tot[i]);         inc(v[i],a[i]);      end;   end;   ans:=0;   for i:=1 to m do inc(ans,(tot[r[i]]-tot[l[i]-1])*(v[r[i]]-v[l[i]-1]));   exit(ans);end;begin   read(n,m,s);   for i:=1 to n do   begin      read(w[i],a[i]);      if w[i]>rr then rr:=w[i];   end;   //   for i:=1 to m do read(l[i],r[i]);   //ll:=0;   mid:=(ll+rr) >>1;   ans:=$7f7f7f7f7f7f7f7f;    while (ll<=rr) do   begin      sum:=check(mid);      if sum<s then      begin         if s-sum<ans then ans:=s-sum;         rr:=mid-1;      end else      begin         if sum-s<ans then ans:=sum-s;         ll:=mid+1;      end;      mid:=(ll+rr)>>1;   end;   writeln(ans)end.

——by Eirlys

转载请注明出处=w=