BZOJ3924 : [Zjoi2015]幻想乡战略游戏

对于一个点，要求出它到所有点的带权距离和，只需记录下树分治的结构然后查询即可。

修改$O(\log n)$，查询$O(\log n)$。

 

到所有点带权距离和最小的点显然是这棵树的带权重心。

以1号点为根，考虑一条从父亲x到孩子y的边：

若y子树内权值和>=总权值和-y子树内权值和，即2*y子树内权值和>=总权值和，则重心在y的子树里，否则不在。

所以重心一定是深度最大的满足2*子树内权值和>=总权值和的点。

可以发现重心及其祖先都满足2*子树内权值和>=总权值和，而这些点在DFS序上从左往右深度递增。

所以树链剖分后用线段树维护DFS序，修改单点点权相当于一条树链整体加上一个数。

查询重心时直接在线段树上二分即可。

修改$O(\log^2n)$，查询$O(\log n)$。

 

#include<cstdio>
typedef long long ll;
const int N=100010,M=2000000,T=262145;
int n,m,i,x,y,z;
int g[N],nxt[N<<1],v[N<<1],w[N<<1],ok[N<<1],ed=1,son[N],f[N],all,now,cnt,value[N];
int size[N],heavy[N],top[N],loc[N],seq[N],dfn;
int G[N],NXT[M],V[2][M],W[M],ED,tag[T];
ll val[T],sw[N],sdw[N],sew[N],sedw[N];
inline void read(int&a){
  char c;bool f=0;a=0;
  while(!((((c=getchar())>='0')&&(c<='9'))||(c=='-')));
  if(c!='-')a=c-'0';else f=1;
  while(((c=getchar())>='0')&&(c<='9'))(a*=10)+=c-'0';
  if(f)a=-a;
}
inline void add(int x,int y,int z){v[++ed]=y,w[ed]=z,nxt[ed]=g[x],ok[ed]=1,g[x]=ed;}
inline void ADD(int x,int y,int z,int w){V[0][++ED]=y;V[1][ED]=z;W[ED]=w;NXT[ED]=G[x];G[x]=ED;}
void findroot(int x,int pre){
  son[x]=1;f[x]=0;
  for(int i=g[x];i;i=nxt[i])if(ok[i]&&v[i]!=pre){
    findroot(v[i],x);
    son[x]+=son[v[i]];
    if(son[v[i]]>f[x])f[x]=son[v[i]];
  }
  if(all-son[x]>f[x])f[x]=all-son[x];
  if(f[x]<f[now])now=x;
}
void dfs(int x,int pre,int dis){
  ADD(x,now,cnt,dis);
  for(int i=g[x];i;i=nxt[i])if(ok[i]&&v[i]!=pre)dfs(v[i],x,dis+w[i]);
}
void solve(int x){
  int i;
  for(i=g[x];i;i=nxt[i])if(ok[i])++cnt,dfs(v[i],x,w[i]);
  for(i=g[x];i;i=nxt[i])if(ok[i])ok[i^1]=0,f[0]=all=son[v[i]],findroot(v[i],now=0),solve(now);
}
void dfs1(int x,int y){
  size[x]=1;f[x]=y;
  for(int i=g[x];i;i=nxt[i])if(v[i]!=y){
    dfs1(v[i],x);size[x]+=size[v[i]];
    if(size[v[i]]>size[heavy[x]])heavy[x]=v[i];
  }
}
void dfs2(int x,int y){
  top[x]=y;seq[loc[x]=++dfn]=x;
  if(heavy[x])dfs2(heavy[x],y);
  for(int i=g[x];i;i=nxt[i])if(v[i]!=heavy[x]&&v[i]!=f[x])dfs2(v[i],v[i]);
}
inline void add1(int x,int p){val[x]+=p,tag[x]+=p;}
inline void pb(int x){if(tag[x])add1(x<<1,tag[x]),add1(x<<1|1,tag[x]),tag[x]=0;}
void change(int x,int a,int b,int c,int d,int p){
  if(c<=a&&b<=d){add1(x,p);return;}
  pb(x);
  int mid=(a+b)>>1;
  if(c<=mid)change(x<<1,a,mid,c,d,p);
  if(d>mid)change(x<<1|1,mid+1,b,c,d,p);
  val[x]=val[x<<1]>val[x<<1|1]?val[x<<1]:val[x<<1|1];
}
inline int getroot(){
  int x=1,a=1,b=n,mid;
  while(a<b){
    pb(x),mid=(a+b)>>1;
    if(val[x<<1|1]*2>=val[1])a=mid+1,x=x<<1|1;else b=mid,x<<=1;
  }
  return seq[a];
}
inline void modify(int x,int y){
  value[x]+=y;
  for(int i=G[x];i;i=NXT[i]){
    sw[V[0][i]]+=y,sdw[V[0][i]]+=(ll)W[i]*y;
    sew[V[1][i]]+=y,sedw[V[1][i]]+=(ll)W[i]*y;
  }
  while(top[x]!=1)change(1,1,n,loc[top[x]],loc[x],y),x=f[top[x]];
  change(1,1,n,1,loc[x],y);
}
inline ll query(int x){
  ll t=sdw[x];
  for(int i=G[x];i;i=NXT[i])t+=(sw[V[0][i]]-sew[V[1][i]]+value[V[0][i]])*W[i]+sdw[V[0][i]]-sedw[V[1][i]];
  return t;
}
int main(){
  read(n),read(m);
  for(i=1;i<n;i++)read(x),read(y),read(z),add(x,y,z),add(y,x,z);
  f[0]=all=n;findroot(1,now=0);solve(now);
  dfs1(1,0),dfs2(1,1);
  while(m--)read(x),read(y),modify(x,y),printf("%lld\n",query(getroot()));
  return 0;
}