首页 > 代码库 > CODEVS1073 家族 (并查集)
CODEVS1073 家族 (并查集)
一道裸的并查集,练练手不错。
program CODEVS1073;var i,j,m,n,q,x,y,k1,k2,z:longint; f:array[0..10000] of longint;function find(x:longint):longint;var fa:longint;begin while f[x]=x do exit(x); fa:=find(f[x]); f[x]:=fa; exit(fa);end;begin readln(n,m,q); for i:=1 to n do f[i]:=i; for i:=1 to m do begin readln(k1,k2); x:=find(k1); y:=find(k2); f[y]:=x; end; for i:=1 to q do begin readln(k1,k2); x:=find(k1); y:=find(k2); if f[x]=f[y] then writeln(‘Yes‘) else writeln(‘No‘); end;end.
CODEVS1073 家族 (并查集)
声明:以上内容来自用户投稿及互联网公开渠道收集整理发布,本网站不拥有所有权,未作人工编辑处理,也不承担相关法律责任,若内容有误或涉及侵权可进行投诉: 投诉/举报 工作人员会在5个工作日内联系你,一经查实,本站将立刻删除涉嫌侵权内容。