家族
来源:互联网 发布:idc服务商网站php源码 编辑:程序博客网 时间:2024/06/08 05:11
1、家族vijos 1034
描述 Description
若某个家族人员过于庞大,要判断两个是否是亲戚,确实还很不容易,现在给出某个亲戚关系图,求任意给出的两个人是否具有亲戚关系。
规定:x和y是亲戚,y和z是亲戚,那么x和z也是亲戚。如果x,y是亲戚,那么x的亲戚都是y的亲戚,y的亲戚也都是x的亲戚。
输入格式 Input Format
第一行:三个整数n,m,p,(n<=5000,m<=5000,p<=5000),分别表示有n个人,m个亲戚关系,询问p对亲戚关系。以下m行:每行两个数Mi,Mj,1<=Mi,Mj<=N,表示Ai和Bi具有亲戚关系。接下来p行:每行两个数Pi,Pj,询问Pi和Pj是否具有亲戚关系。
输出格式 Output Format
P行,每行一个’Yes’或’No’。表示第i个询问的答案为“具有”或“不具有”亲戚关系。
样例输入 Sample Input
6 5 3
1 2
1 5
3 4
5 2
1 3
1 4
2 3
5 6
样例输出 Sample Output
Yes
Yes
No
分析:
因为要查找多次,有涉及集合,那并查集最合适不过了。
var i,j,k,n,m,p,x,y:longint; a:array[1..100001]of longint;function getfather(v:longint):longint;var i,j:longint;begin if a[v]=v then exit(v); a[v]:=getfather(a[v]); getfather:=a[v];end;procedure find(x,y:longint);begin x:=getfather(x); y:=getfather(y); a[x]:=y;end;begin readln(n,m,p); for i:=1 to n do a[i]:=i; for i:=1 to m do begin readln(x,y); find(x,y); end; for i:=1 to p do begin readln(x,y); if getfather(x)=getfather(y) then writeln('Yes') else writeln('No'); end;end.
阅读全文
0 0
- 家族
- 家族
- 家族
- 家族
- 家族
- 家族
- 家族
- VA家族
- SQL家族
- Watir 家族
- UNIX家族
- Watir 家族
- 施耐德家族
- 802.11 家族
- scanf 家族
- printf 家族
- WebSphere家族
- grep 家族
- nmake命令编译器的使用
- jboss 日志按天生成
- 操作系统学习02
- Qt事件处理(二)——事件处理链
- 如何更改U盘的图标
- 家族
- perl 中文处理 乱码
- tomcat使用问题解决记录
- 【Deep Learning】Tensorflow MNIST测试
- 安装Anaconda3
- MySQL的几种join
- java并发编程学习13--Atomic数据结构简介
- 入坑R-N
- mysql修改默认存储路径