SP14932 LCA

#include<bits/stdc++.h>
using namespace std;
const int maxn=1005;
const int maxm=3005;
struct edge{int to,nex;}e[maxm];
int head[maxn],tot;
int deep[maxn],f[maxn][30];
int T,n,m,q;
inline void add(int x,int y){e[++tot].to=y;e[tot].nex=head[x];head[x]=tot;}
void dfs(int k)
{
    for(int i=head[k];i;i=e[i].nex)
    {
        if(!deep[e[i].to])
        {
            deep[e[i].to]=deep[k]+1;
            f[e[i].to][0]=k;
            dfs(e[i].to);
        }
    }
}
void init()
{
    for(int j=1;(1<<j)<=n;++j)
        for(int i=1;i<=n;++i)
            if(f[i][j-1]) f[i][j]=f[f[i][j-1]][j-1];
}
int LCA(int x,int y)
{
    if(deep[x]<deep[y]) swap(x,y);
    int i;for(i=0;(1<<i)<=n;++i);--i;
    for(int j=i;j>=0;--j) if(deep[x]-(1<<j)>=deep[y]) x=f[x][j];
    if(x==y) return x;
    for(int j=i;j>=0;--j) if(f[x][j]&&f[x][j]!=f[y][j]) x=f[x][j],y=f[y][j];
    return f[x][0];
}
void clear()
{
    tot=0;
    memset(f,0,sizeof(f));
    memset(deep,0,sizeof(deep));
    memset(head,0,sizeof(head));
    memset(e,0,sizeof(e));
}
int main()
{
    scanf("%d",&T);
    for(int i=1;i<=T;++i)
    {
        scanf("%d",&n);
        for(int j=1;j<=n;++j)
        {
            scanf("%d",&m);
            for(int k=1,tmp;k<=m;++k)
            {
                scanf("%d",&tmp);
                add(j,tmp);
            }
        }
        dfs(1);
        init();
        scanf("%d",&q);
        printf("Case %d:
",i);
        for(int i=1,x,y;i<=q;++i) scanf("%d%d",&x,&y),printf("%d
",LCA(x,y));
        clear();
    }
    return 0;
}