【CF700B】Connecting Universities（贪心，树上最短路）

题意：给出一棵树上的2*k个节点，给他们配对，使得他们之间的距离和最大。

思路：一条边的两侧如果有一侧没有给定的节点就不会被经过……

        如果有1个节点就会被经过1次……

        如果两侧分别有x,y个给定节点就会被经过min(x,y)次

        因为要使总路程最大就是让每一条路被走过最多的次数

        肯定是两侧各取一个 剩下的只能在某侧内部解决

        所以按此统计即可

        答案很大 用INT64

    

var head,vet,next,a,b,c,dep,flag,f:array[1..500000]of longint;
    n,k,tot,i:longint;
    ans:int64;

procedure add(a,b:longint);
begin
 inc(tot);
 next[tot]:=head[a];
 vet[tot]:=b;
 head[a]:=tot;
end;

function min(x,y:longint):longint;
begin
 if x<y then exit(x);
 exit(y);
end;

procedure dfs(u,fa:longint);
var e,v:longint;
begin
 flag[u]:=1;
 e:=head[u];
 while e<>0 do
 begin
  v:=vet[e];
  if (v<>fa)and(flag[v]=0) then
  begin
   dep[v]:=dep[u]+1;
   dfs(v,u);
   f[u]:=f[u]+f[v];
  end;
  e:=next[e];
 end;
end;

begin
 read(n,k);
 for i:=1 to 2*k do
 begin
  read(c[i]);
  f[c[i]]:=1;
 end;
 for i:=1 to n-1 do
 begin
  read(a[i],b[i]);
  add(a[i],b[i]);
  add(b[i],a[i]);
 end;
 dfs(1,-1);
 for i:=1 to n-1 do
  if dep[a[i]]>dep[b[i]] then ans:=ans+min(f[a[i]],2*k-f[a[i]])
   else ans:=ans+min(f[b[i]],2*k-f[b[i]]);
 writeln(ans);

end.