祖孙询问

最新推荐文章于 2024-01-17 13:20:50 发布

Amber_lylovely

最新推荐文章于 2024-01-17 13:20:50 发布

阅读量582

点赞数

分类专栏：树

本文链接：https://blog.csdn.net/liangzihao1/article/details/52443459

版权

树专栏收录该内容

26 篇文章 0 订阅

订阅专栏

Description
已知一棵n个节点的有根树。有m个询问。每个询问给出了一对节点的编号x和y，询问x与y的祖孙关系。

Input
输入第一行包括一个整数n表示节点个数。

接下来n行每行一对整数对a和b表示a和b之间有连边。如果b是-1，那么a就是树的根。

第n+2行是一个整数m表示询问个数。

接下来m行，每行两个正整数x和y。

Output
对于每一个询问，输出1:如果x是y的祖先，输出2:如果y是x的祖先，否则输出0。

Sample Input
10

234 -1

12 234

13 234

14 234

15 234

16 234

17 234

18 234

19 234

233 19

234 233

233 12

233 13

233 15

233 19

Sample Output
1

Data Constraint
Hint
对于100%的.据,n,m≤40000，每个节点的编号都不超过40000。

分析：跑一遍dfs，记录前序遍历和后序遍历，然后判断即可。
如果x为y的父亲，则
$（qian[x]<qian[y]）and (hou[x]>hou[y])。$

代码：

type
 node=record
 y,next:longint;
end;

var
 ls,d,f:array [0..40001] of longint;
 g:array [0..80001] of node;
 b:array [0..40001] of boolean;
 n,m,i,j,x,y,root,h,p:longint;
function other(x:longint):longint;
 begin
  if x<=n then exit(x+n)
          else exit(x-n);
 end;

procedure dfs(x:longint; var s:longint);
 var t:longint;
begin
 t:=ls[x];
 inc(p);
 d[x]:=p;
 while t>0 do
  begin
   if b[g[t].y] then
    begin
     b[g[t].y]:=false;
     dfs(g[t].y,s);
    end;
   t:=g[t].next;
  end;
 inc(s);
 f[x]:=s;
end;

begin
 readln(n);
 for i:=1 to n do
  begin
   readln(x,y);
   if y<>-1 then
    begin
     g[i].y:=y;
     g[i].next:=ls[x];
     ls[x]:=i;
     g[i+n].y:=x;
     g[i+n].next:=ls[y];
     ls[y]:=i+n;
    end
   else root:=x;
  end;
 fillchar(b,sizeof(b),true);
 b[root]:=false;
 h:=0;
 dfs(root,h);
 readln(m);
 for i:=1 to m do
  begin
   readln(x,y);
   if (f[x]=0) or (f[y]=0) then
    begin
     writeln(0);
     continue;
    end;
   if (d[x]<d[y]) and (f[x]>f[y]) then writeln(1)
    else
     if (d[x]>d[y]) and (f[x]<f[y]) then writeln(2)
                                    else writeln(0);
  end;
end.