N个布丁摆成一行,进行M次操作.每次将某个颜色的布丁全部变成另一种颜色的,然后再询问当前一共有多少段颜色.例如颜色分别为1,2,2,1的四个布丁一共有3段颜色.
标签：des style blog http color os io for
N个布丁摆成一行,进行M次操作.每次将某个颜色的布丁全部变成另一种颜色的,然后再询问当前一共有多少段颜色.例如颜色分别为1,2,2,1的四个布丁一共有3段颜色.
第一行给出N,M表示布丁的个数和好友的操作次数. 第二行N个数A1,A2...An表示第i个布丁的颜色从第三行起有M行,对于每个操作,若第一个数字是1表示要对颜色进行改变，其后的两个整数X,Y表示将所有颜色为X的变为Y，X可能等于Y. 若第一个数字为2表示要进行询问当前有多少段颜色，这时你应该输出一个整数. 0
针对第二类操作即询问，依次输出当前有多少段颜色.
题解：--hzwer
1 const maxn=1000000+100; 2 var s,a,st,fa,head,next:array[0..maxn] of longint; 3 i,n,m,x,y,xx,yy,ans,ch:longint; 4 procedure swap(var x,y:longint); 5 var t:longint; 6 begin 7 t:=x;x:=y;y:=t; 8 end; 9 10 procedure init; 11 begin 12 readln(n,m);ans:=0; 13 for i:=1 to n do 14 begin 15 read(a[i]);fa[a[i]]:=a[i]; 16 if a[i]<>a[i-1] then inc(ans); 17 if head[a[i]]=0 then st[a[i]]:=i; 18 inc(s[a[i]]); 19 next[i]:=head[a[i]];head[a[i]]:=i; 20 end; 21 end; 22 procedure solve(x,y:longint); 23 var i:longint; 24 begin 25 i:=head[x]; 26 while i<>0 do 27 begin 28 if a[i-1]=y then dec(ans); 29 if a[i+1]=y then dec(ans); 30 i:=next[i]; 31 end; 32 i:=head[x]; 33 while i<>0 do 34 begin 35 a[i]:=y; 36 i:=next[i]; 37 end; 38 next[st[x]]:=head[y];head[y]:=head[x];inc(s[y],s[x]); 39 head[x]:=0;s[x]:=0;st[x]:=0; 40 end; 41 42 procedure main; 43 begin 44 for i:=1 to m do 45 begin 46 read(ch); 47 case ch of 48 2:writeln(ans); 49 1:begin 50 readln(x,y); 51 if x=y then continue; 52 if s[fa[x]]>s[fa[y]] then swap(fa[x],fa[y]); 53 xx:=fa[x];yy:=fa[y]; 54 if s[xx]=0 then continue; 55 solve(xx,yy); 56 end; 57 end; 58 end; 59 end; 60 61 begin 62 assign(input,‘input.txt‘);assign(output,‘output.txt‘); 63 reset(input);rewrite(output); 64 init; 65 main; 66 close(input);close(output); 67 end.
BZOJ1483: [HNOI2009]梦幻布丁,布布扣,bubuko.com
标签：des style blog http color os io for
原文地址：http://www.cnblogs.com/zyfzyf/p/3898191.html
