银河英雄传说

题目描述

公元五八○一年，地球居民迁至金牛座α第二行星，在那里发表银河联邦创立宣言，同年改元为宇宙历元年，并开始向银河系深处拓展。

宇宙历七九九年，银河系的两大军事集团在巴米利恩星域爆发战争。泰山压顶集团派宇宙舰队司令莱因哈特率领十万余艘战舰出征，气吞山河集团点名将杨威利组织麾下三万艘战舰迎敌。

杨威利擅长排兵布阵，巧妙运用各种战术屡次以少胜多，难免恣生骄气。在这次决战中，他将巴米利恩星域战场划分成 $M_{i,j}Mi,j ，含义为第i号战舰所在的整个战舰队列，作为一个整体（头在前尾在后）接至第j号战舰所在的战舰队列的尾部。显然战舰队列是由处于同一列的一个或多个战舰组成的。合并指令的执行结果会使队列增大。$

然而，老谋深算的莱因哈特早已在战略上取得了主动。在交战中，他可以通过庞大的情报网络随时监听杨威利的舰队调动指令。

在杨威利发布指令调动舰队的同时，莱因哈特为了及时了解当前杨威利的战舰分布情况，也会发出一些询问指令： $C_{i,j}Ci,j 。该指令意思是，询问电脑，杨威利的第 ii 号战舰与第 jj 号战舰当前是否在同一列中，如果在同一列中，那么它们之间布置有多少战舰。$

作为一个资深的高级程序设计员，你被要求编写程序分析杨威利的指令，以及回答莱因哈特的询问。

最终的决战已经展开，银河的历史又翻过了一页……

输入输出格式

输入格式：

第一行有一个整数 $\le T \le 500,000)T(1≤T≤500,000) ，表示总共有 TT 条指令。$

以下有

$M_{i,j}Mi,j ： ii 和 jj 是两个整数 (1 \le i,j \le 30000)(1≤i,j≤30000) ，表示指令涉及的战舰编号。该指令是莱因哈特窃听到的杨威利发布的舰队调动指令，并且保证第 ii 号战舰与第 jj 号战舰不在同一列。$
$C_{i,j}Ci,j ： ii 和 jj 是两个整数 (1 \le i,j \le 30000)(1≤i,j≤30000) ，表示指令涉及的战舰编号。该指令是莱因哈特发布的询问指令。$

输出格式：

依次对输入的每一条指令进行分析和处理：

如果是杨威利发布的舰队调动指令，则表示舰队排列发生了变化，你的程序要注意到这一点，但是不要输出任何信息；

如果是莱因哈特发布的询问指令，你的程序要输出一行，仅包含一个整数，表示在同一列上，第

输入输出样例

输入样例#1：

输出样例#1：

-1
1
题解：这个程序给我们带来的新知识有两个——一个是带权并查集，一个是并查集递归的先后顺序
一般并查集我都是这么写的fa[x]:=find(fa[x]);这样fa[x]已经被赋值了，
而程序里的find:=find(fa[x]);  dis[x]:=dis[fa[x]]+dis[x];  fa[x]:=find; 是回溯之后才改的fa[x]的值，这样才能正确记录它到它父亲，然后到它祖先的dis值

【转】更新很容易，我们来分析一下：对于原来的队头，它到队头的距离为0，当将它所在的队列移到另一个队列后面时，它到队头的距离就是排在它前面的飞船数，也就是合并前另一个队列的飞船数量。因此，就知道该怎样实现了，我们再建一个数组num，num[i]表示以i为队头的队列的飞船数量，初始时都是1，在每次合并的时候，fx为合并前飞船i的队头，fy为合并前飞船j的队头，每次合并时，先更新dis[fx]，即给它加上num[fy]，然后开始合并，即fa[fx]=fy，最后更新num， num[fy]+= num[fx];num[fx]=0。

现在就差最后一步了：如何计算每个飞船到队头的距离。再来分析一下：对于任意一个飞船，我们都知道它的祖先（不一定是队头，但一定间接或直接指向队头），还知道距离它祖先的距离。对于每一个飞船，它到队头的距离，就等于它到它祖先的距离加上它祖先到队头的距离，而它的祖先到队头的距离，也可以变成类似的。可以递归实现，由于每一次更新都要用到已经更新完成的祖先到队头的距离，所以要先递归找到队头，然后在回溯的时候更新（dis[i]+=dis[fa[i]]），可以把这个过程和查找队头的函数放在一起。

 1 var
 2 fa,dis,num:array[0..300000]of longint;
 3 ch:char;
 4 i,j,k,x,y,f1,f2,n,k1,k2,tot:longint;
 5 function find(x:longint):longint;
 6  begin
 7 
 8   if fa[x]=x then exit(fa[x]) else
 9 
10   begin
11   find:=find(fa[x]);
12   dis[x]:=dis[fa[x]]+dis[x];
13    fa[x]:=find;
14   end;
15  end;
16 
17 begin
18  readln(n);
19  for i:=1 to 30000 do begin num[i]:=1;fa[i]:=i; end;
20  for i:=1 to n do
21   begin
22    readln(ch,x,y);
23    if ch='M' then
24      begin
25       f1:=find(x); f2:=find(y);
26         fa[f1]:=f2;
27         dis[f1]:=num[f2]+dis[f1];
28         num[f2]:=num[f2]+num[f1];
29      end;
30    if ch='C'then
31     begin
32      f1:=find(x);  f2:=find(y);
33      if f1<>f2 then writeln('-1')
34      else writeln(abs(dis[x]-dis[y])-1);
35     end;
36   end;
37 end.

posted @ 2018-08-02 17:51 jiangyihui 阅读(148) 评论(0) 编辑收藏举报

会员力量，点亮园子希望

刷新页面返回顶部

jiangyihui

银河英雄传说

题目描述

输入输出格式

输入输出样例

公告