【NOIP模拟】Angel Beats!

Description

天使立华奏攻入了死后世界战线（SSS）的地下工会Guild，这是万分危急的时候。仲村由理指挥工会成员有条不紊地进行撤退工作。工会成员在Guild最深层工厂安放炸药需要很长的准备时间，需要有人来拖延立华奏的前进速度。但是他们并不清楚立华奏的具体位置，因此他们需要设立许多个防御点。
Guild的结构可以看成一棵有n 个节点的树，有时由理会得到立华奏的大概位置，可能在某两棵子树的任意一棵中，她就会找到Guild树（不一定要在两棵子树内）上的一个点，使得该点到两棵子树中所有点距离之和最小，即这两棵子树的重心（如果两棵子树有重合部分，那么取它们并集求重心）。
具体而言，你会得到Guild的结构（1为根），然后会有q个询问，向你查询点x子树和点y子树的重心，重心可能会有很多个，你只需要输出距离和即可。

Solution

crazy_czy很喜欢这部番……卖广告
看到这题很懵逼啊，一个点x到他所在的子树y的所有节点的距离和怎么求，这个很简单，正难则反：
$子树所有点到x距离和=所有点到x距离和-非子树所有点到x距离和$
$=所有点到x距离和-非子树所有点到子树根距离和-(n-子树大小)× dist(x, y)$
$=所有点到x距离和-(所有点到子树根距离和-子树所有点到子树根距离和) -(n-子树大小)× dist(x, y)$
但是现在问题来了，怎么预处理出每个子树的重心？？？？？
然后我这题就爆零了。
crazy_czy用了一大堆性质给我们讲。
$结论 1：两棵子树的重心一定在两棵子树各自重心连线的路径上。$
$结论 2：在两棵子树size较大那棵内部一定能找到两棵子树重心。$
$结论 2 的推论：对于一个点x，令其size最大儿子为y，如果size(x)-1? size(y) ≥ size(y)，那么子树x的重心一定为x，否则就一定在点y的子树内$
结论2的推论证明十分的机制，因为如果size(x)-size(y)-1≥size(y)，就说明重心不在最大的那个子数里面而在其他的子树的集合里面，那么最大的子树不符合，其他任意的子树也是同样的情况，那么最后所有子树集合的交际就是根节点x。
虽然知道了这些，代码———-
但是还是搞了很久，当时我向上倍增找重心一直找错，后来改了个巧妙的倍增。
本来倍增我存了很多什么最小值啊，位置啊之内的，然后其实每次倍增满足

    size[y]-size[f[x][i]]>size[y]/2&&deep[f[x][i]]>deep[y]

这段东西就可以了，然后

if(size[y]-size[f[x][0]]<=size[y]/2&&size[big[f[x][0]]]<=size[y]/2)return f[x][0];return x;

在往上跳一位就是重心了。
表示调了好久……

Code

#include<iostream>
#include<cstdio>
#include<cstring>
#include<cstdio>
#include<algorithm>
#define fo(i,a,b) for(i=a;i<=b;i++)
#define fod(i,a,b) for(i=a;i>=b;i--)
#define rep(i,a) for(i=first[a];i;i=next[i])
using namespace std;
const int maxn=100007;
int i,j,k,l,t,n,m,ans;
int first[maxn*2],next[maxn*2],last[maxn*2],num,bb,cc; 
int f[maxn][21],deep[maxn],g[maxn][21],size[maxn],zhong[maxn],big[maxn],wei[maxn][21],sum[maxn],zs[maxn];
void add(int x,int y){
    last[++num]=y;next[num]=first[x];first[x]=num;
    last[++num]=x;next[num]=first[y];first[y]=num;
}
/*int lca(int x,int y){
    bb=0x7fffffff;cc=0;
    int i;
    if(deep[x]<deep[y])swap(x,y);
    fod(i,20,0)if(deep[f[x][i]]>deep[y])cc=(g[x][i]<bb)?wei[x][i]:cc,bb=min(bb,g[x][i]),x=f[x][i];
    if(deep[x]!=deep[y])cc=(g[x][0]<bb)?wei[x][0]:cc,bb=min(bb,g[x][i]),x=f[x][0];
    fod(i,20,0)if(f[x][i]!=f[y][i])cc=(g[x][i]<bb)?wei[x][i]:cc,bb=min(g[x][i],bb),cc=(g[y][i]<bb)?wei[y][i]:cc,bb=min(g[y][i],bb),x=f[x][i],y=f[y][i];
    if(x!=y)cc=(g[x][0]<bb)?wei[x][0]:cc,bb=min(g[x][0],bb),cc=(g[y][0]<bb)?wei[y][0]:cc,bb=min(g[y][0],bb);
    if(x!=y)return f[x][0];return x;
}*/
int lca(int x,int y){
    int i,k=0x7fffffff;
    if(deep[x]<deep[y])swap(x,y);
    fod(i,20,0)
    if(deep[f[x][i]]>deep[y])
    bb=(g[x][i]<k?wei[x][i]:bb),k=min(k,g[x][i]),x=f[x][i];    
    if(deep[x]!=deep[y])bb=(g[x][0]<k?wei[x][0]:bb),k=min(k,g[x][0]),x=f[x][0];
    fod(i,20,0)if(f[x][i]!=f[y][i])bb=(g[x][i]<k?wei[x][i]:bb),k=min(k,g[x][i]),bb=(g[y][i]<k?wei[y][i]:bb),k=min(k,g[y][i]),x=f[x][i],y=f[y][i];
    if(x!=y)bb=(g[x][0]<k?wei[x][0]:bb),k=min(k,g[x][0]),bb=(g[y][0]<k?wei[y][0]:bb),k=min(k,g[y][0]);
    if(x!=y)return f[x][0];else return x;
}
int bei(int x,int y){
    int i,k=0x7fffffff;
    if(deep[x]<deep[y])swap(x,y);
    fod(i,20,0)if(size[y]-size[f[x][i]]>size[y]/2&&deep[f[x][i]]>deep[y])x=f[x][i];
    if(size[y]-size[f[x][0]]<=size[y]/2&&size[big[f[x][0]]]<=size[y]/2/*&&deep[f[x][0]]>deep[y]*/)return f[x][0];return x;
}
void dfs(int x,int y){
    int i,k=0;
    deep[x]=deep[y]+1;size[x]=1;
    sum[1]+=deep[x]-1;
    if(x==38){
        ans=ans;
    }
    rep(i,x){
        if(last[i]!=y){
            dfs(last[i],x);
            size[x]+=size[last[i]];
            if(size[last[i]]>k){
                k=size[last[i]];
                big[x]=last[i];
            }
            zs[x]+=zs[last[i]]+size[last[i]];
        }
    }
}
void dfs1(int x,int y){
    int i,o=n-size[x];
    g[x][0]=sum[x];wei[x][0]=x;
    if(x==38){
        ans=ans;
    }
    rep(i,x){
        if(last[i]!=y){
            sum[last[i]]=sum[x]+(n-size[last[i]])-size[last[i]];
            dfs1(last[i],x);
        }
    }
}
void fh(int x,int y){
    int i,o=n-size[x];
    rep(i,x){
        if(last[i]!=y){
            fh(last[i],x);

        }
    }
    if(size[x]==1){
        zhong[x]=x;
        return;
    }
    if(x==38){
        ans=ans;
    }
    if(size[big[x]]<=size[x]-size[big[x]]-1)zhong[x]=x;
    else{
    /*  if(size[x]-size[zhong[big[x]]]<=size[x]/2){
            zhong[x]=zhong[big[x]];
        }
        else{*/
            int o=bei(zhong[big[x]],x);
            zhong[x]=o;        
    //    }
    }
}
int suan(int x,int y){
    int o=0;
    o=sum[x]-(sum[y]-zs[y])-(n-size[y])*(deep[x]-deep[y]);
}
int main(){
//  freopen("fan.out","w",stdout);
    scanf("%d",&n);
    fo(i,2,n){
        scanf("%d",&f[i][0]);
        add(f[i][0],i);
    }
    dfs(1,0);
    memset(g,127,sizeof(g));
    dfs1(1,0);
    fo(j,1,20){
        fo(i,1,n){
            f[i][j]=f[f[i][j-1]][j-1];
            wei[i][j]=(g[i][j-1]<g[f[i][j-1]][j-1])?wei[i][j-1]:wei[f[i][j-1]][j-1];
            g[i][j]=min(g[i][j-1],g[f[i][j-1]][j-1]);
        }
    }
    fh(1,0);
    for(scanf("%d",&m);m;m--){
        scanf("%d%d",&k,&l);
        int o=lca(k,l);int u=deep[k]-2*deep[o]+deep[l];int ss=size[k]+size[l];
        if(size[k]<size[l])swap(k,l);
        if(k==o)ss=size[k];
        int z=zhong[k];
        fod(i,20,0)if(ss-size[f[z][i]]>ss/2&&deep[f[z][i]]>deep[k])z=f[z][i];
        if(ss-size[f[z][0]]<=ss/2&&size[big[f[z][0]]]<=ss/2/*&&deep[f[z][0]]>=deep[k]&&deep[f[z][0]]>deep[o]*/)z=f[z][0];
        if(k==o)ans=suan(z,k);
        else ans=suan(z,k)+(u+deep[z]-deep[k])*size[l]+zs[l];
        printf("%d\n",ans);
    }
}