[BZOJ2654] tree

传送门

http://www.lydsy.com/JudgeOnline/problem.php?id=2654

题目大意

给定一些分为黑白两种的边,询问满足包含t条白边的最小生成树

题解

ORZ cls
如果我们想尽可能的多的白边我们要将白边权值加一个很大的负数
如果我们想尽可能的少的白边我们要将白边权值加一个很大的正数
这个是满足二分的性质的~
所以二分加的权值求最小生成树
注意排序时权值相同白边先行
有一个也可以用相同思想做的题[BZOJ3675] [Apio2014]序列分割

const
    maxn=50050;
    maxm=100050;
var
    x:array[0..maxm,1..4]of longint;
    fa:array[0..maxn]of longint;
    i,j,k:longint;
    n,m,t,l,r,mid,ans,sum:longint;
procedure sort(l,r:longint);
var i,j,a,b,c,d:longint;
begin
    i:=l; j:=r; a:=x[(l+r)div 2,3]; d:=x[(l+r)div 2,4];
    repeat
        while (x[i,3]<a)or((a=x[i,3])and(d>x[i,4])) do inc(i);
        while (a<x[j,3])or((a=x[j,3])and(d<x[j,4])) do dec(j);
        if not(i>j) then
        begin
            c:=1; b:=x[i,c]; x[i,c]:=x[j,c]; x[j,c]:=b;
            c:=2; b:=x[i,c]; x[i,c]:=x[j,c]; x[j,c]:=b;
            c:=3; b:=x[i,c]; x[i,c]:=x[j,c]; x[j,c]:=b;
            c:=4; b:=x[i,c]; x[i,c]:=x[j,c]; x[j,c]:=b;
            inc(i); dec(j);
        end;
    until i>j;
    if l<j then sort(l,j);
    if i<r then sort(i,r);
end;

function get(a:longint):longint;
begin
    if fa[a]=a then exit(a);
    fa[a]:=get(fa[a]);
    exit(fa[a]);
end;

function check(a:longint):longint;
var i,tot,b,c:longint;
begin
    for i:=1 to m do
        if x[i,4]=0 then inc(x[i,3],a);
    for i:=1 to n do
        fa[i]:=i;
    sort(1,m);
    tot:=0; sum:=0;
    for i:=1 to m do
        begin
            b:=get(x[i,1]); c:=get(x[i,2]);
            if b=c then continue;
            fa[b]:=c;
            inc(sum,x[i,3]);
            if x[i,4]=0 then inc(tot);
        end;
    for i:=1 to m do
        if x[i,4]=0 then dec(x[i,3],a);
    exit(tot);
end;

begin
    randomize;
    readln(n,m,t); ans:=0; sum:=0;
    for i:=1 to m do
        begin
            readln(x[i,1],x[i,2],x[i,3],x[i,4]);
            inc(x[i,1]); inc(x[i,2]);
        end;
    l:=-105; r:=105;
    while l<=r do
        begin
            mid:=(l+r)div 2;
            if check(mid)<t
            then r:=mid-1
            else begin ans:=sum-t*mid; l:=mid+1; end;
        end;
    writeln(ans);
end.