BZOJ4530:[BJOI2014]大融合
Description
Input
Output
Sample Input
A 2 3
A 3 4
A 3 8
A 8 7
A 6 5
Q 3 8
Sample Output
1 var 2 i,n,m,cnt,cnt2,mm:longint; 3 j,k,l:int64; 4 b,fa:array[0..200001,1..2]of int64; 5 q:array[0..200001,0..2]of longint; 6 r,v,dep,c:array[0..200001]of longint; 7 xh:array[0..200001,1..2]of longint; 8 t:array[0..4000001,-2..2]of longint; 9 ch:char; 10 procedure ss(x,fa:longint); 11 var i:longint; 12 begin 13 v[x]:=1; i:=c[x]; inc(cnt); xh[x,1]:=cnt; dep[x]:=dep[fa]+1; 14 while i>0 do 15 begin 16 if b[i,1]<>fa then ss(b[i,1],x); 17 i:=b[i,2]; 18 end; 19 xh[x,2]:=cnt; 20 end; 21 function hb(x,y:longint):longint; 22 begin 23 if t[x,1]=t[x,2] then 24 begin t[x,0]:=t[x,0]+t[y,0]; exit(x); end; 25 if(t[x,-1]=0)and(t[y,-1]>0)then t[x,-1]:=t[y,-1] else 26 if(t[x,-1]>0)and(t[y,-1]>0)then t[x,-1]:=hb(t[x,-1],t[y,-1]); 27 if(t[x,-2]=0)and(t[y,-2]>0)then t[x,-2]:=t[y,-2] else 28 if(t[x,-2]>0)and(t[y,-2]>0)then t[x,-2]:=hb(t[x,-2],t[y,-2]); 29 t[x,0]:=t[t[x,-1],0]+t[t[x,-2],0]; 30 exit(x); 31 end; 32 function newt(l,r:longint):longint; 33 begin 34 inc(cnt2); t[cnt2,1]:=l; t[cnt2,2]:=r; exit(cnt2); 35 end; 36 procedure cl(x,y:longint); 37 var ll,rr:longint; 38 begin 39 ll:=t[x,1]; rr:=t[x,2]; inc(t[x,0]); 40 if ll=rr then exit; 41 if y<=(ll+rr)div 2 then 42 begin 43 if t[x,-1]=0 then t[x,-1]:=newt(ll,(ll+rr)div 2); 44 cl(t[x,-1],y); 45 end else 46 begin 47 if t[x,-2]=0 then t[x,-2]:=newt((ll+rr)div 2+1,rr); 48 cl(t[x,-2],y); 49 end; 50 end; 51 function qq(x,l,r:longint):longint; 52 var ll,rr:longint; 53 begin 54 if x=0 then exit(0); 55 ll:=t[x,1]; rr:=t[x,2]; 56 if(ll=l)and(rr=r)then exit(t[x,0]); 57 if r<=(ll+rr)div 2 then exit(qq(t[x,-1],l,r)); 58 if l>(ll+rr)div 2 then exit(qq(t[x,-2],l,r)); 59 exit(qq(t[x,-1],l,(ll+rr)div 2)+qq(t[x,-2],(ll+rr)div 2+1,r)); 60 end; 61 function get(x:longint):longint; 62 begin 63 if fa[x,1]<>x then fa[x,1]:=get(fa[x,1]); 64 exit(fa[x,1]); 65 end; 66 begin 67 readln(n,m); 68 for i:=1 to m do 69 begin 70 read(ch); readln(j,k); q[i,1]:=j; q[i,2]:=k; 71 if ch='A' then 72 begin 73 inc(mm); b[mm,1]:=k; b[mm,2]:=c[j]; c[j]:=mm; 74 inc(mm); b[mm,1]:=j; b[mm,2]:=c[k]; c[k]:=mm; 75 end else q[i,0]:=1; 76 end; 77 for i:=1 to n do 78 if v[i]=0 then ss(i,0); 79 for i:=1 to n do 80 begin 81 fa[i,1]:=i; fa[i,2]:=1; 82 r[i]:=newt(1,cnt); cl(r[i],xh[i,1]); 83 end; 84 for i:=1 to m do 85 begin 86 if q[i,0]=0 then 87 begin 88 j:=q[i,1]; k:=q[i,2]; 89 j:=get(j); k:=get(k); 90 fa[k,1]:=j; fa[j,2]:=fa[j,2]+fa[k,2]; 91 r[j]:=hb(r[j],r[k]); 92 end else 93 begin 94 j:=q[i,1]; k:=q[i,2]; 95 if dep[j]>dep[k] then begin l:=j; j:=k; k:=l; end; 96 j:=get(j); k:=qq(r[j],xh[k,1],xh[k,2]); 97 writeln(k*(fa[j,2]-k)); 98 end; 99 end; 100 end.
View Code
转载于:https://www.cnblogs.com/GhostReach/p/6294257.html
BZOJ4530:[BJOI2014]大融合相关推荐
- [BZOJ4530][Bjoi2014]大融合 LCT + 启发式合并
[BZOJ4530][Bjoi2014]大融合 试题描述 小强要在N个孤立的星球上建立起一套通信系统.这套通信系统就是连接N个点的一个树. 这个树的边是一条一条添加上去的.在某个时刻,一条边的负载就是 ...
- [Bjoi2014]大融合
[Bjoi2014]大融合 Time Limit: 10 Sec Memory Limit: 256 MB Submit: 394 Solved: 244 [Submit][Status][Dis ...
- LCT维护子树信息(BZOJ4530:[BJOI2014]大融合)
题面 没有权限号的可以去LOJ Sol 大家都知道,\(LCT\)上有许多实边和虚边 实边就是每棵\(Splay\)上的既认父亲又认儿子的边 虚边就是\(Splay\)和\(Splay\)之间只认父亲 ...
- bzoj 4530 [Bjoi2014]大融合——LCT维护子树信息
题目:https://www.lydsy.com/JudgeOnline/problem.php?id=4530 LCT维护子树 siz .设 sm[ ] 表示轻儿子的 siz 和+1(1是自己的si ...
- LOJ#2230. 「BJOI2014」大融合
LOJ#2230. 「BJOI2014」大融合 题目描述 小强要在$N$个孤立的星球上建立起一套通信系统.这套通信系统就是连接$N$个点的一个树.这个树的边是一条一条添加上去的. 在某个时刻,一条边的 ...
- Vue笔记大融合总结
<!DOCTYPE html> <html lang="en"><head><meta charset="UTF-8" ...
- 极客日报:阿里再度调整组织架构:天猫淘宝大融合,新设三大中心;苹果M1首席芯片设计师跳槽至英特尔
一分钟速览新闻点! 腾讯接入数字人民币,微信支持数字人民币支付 阿里再度调整组织架构:天猫淘宝大融合,新设三大中心 七成清华毕业生进入体制内就业 北京最受欢迎:华为腾讯等科技企业也受青睐 钉钉近期将推 ...
- 重塑大融合体系,立体推进“业财合一”
3月16日,主题为"智能会计 价值财务"的2023企业数智化财务创新峰会在北京召开.用友网络高级专家张伟发表了题为"聚势向新:智能会计助力企业高质量发展"的演讲 ...
- 全域旅游发展的“首都经验” , 全域旅游的十大融合
一.北京发展全域旅游的历史渊源和现实基础 北京是全域旅游思想形成和理论创新的重要发源地之一,2008年延庆的千家店镇就提出"镇景合一",2011年延庆在全国率先提出建设" ...
最新文章
- sybase asa转mysql_为Sybase ASA创建外部存储过程(Java示例)
- x265-确定slice type-3
- Mac上解决Chrome浏览器跨域问题
- The value of a feed cannot be a tf.Tensor object.
- 聊天系统服务器端类图怎么画,聊天系统服务器端类图
- java switch case多个条件_JAVA基础程序设计之判断与循环
- [论文阅读] Large Scale Incremental Learning
- Ubuntu操作U盘相关
- 5.支付平台架构:业务、规划、设计与实现 --- 账务系统
- 计算机office demo,办公软件应用(Office2007)中级 DEMO盘-2013.doc
- 《史蒂夫·乔布斯传》(Steve Jobs)官方正式中文版高清PDF
- k8s Storage Classes
- 邓_phpcms_二次开发_留言板
- [转]李商隐《嫦娥》赏析
- java EE 第十二周 web前端开发的周总结 (含思维导图)
- jmeter——提取内容到文件
- java左手画圆右手画方_左手画圆,右手画方,有两个截然不同的说法,你知道吗?...
- Nature计算社会科学特刊:如何对21世纪人类社会进行有意义的度量?
- 【理财入门二】复利思维
- WebService接口调试如此简单
热门文章
- python em和web_Python web 框架
- 拦截游戏窗口被移动_非常简单实用的有效阻止您的电脑弹窗-拦截不受欢迎的弹窗...
- demo 网络运维_【运维面试】面试官:你们公司的docker主要用来做啥?
- fastreport调用frf文件直接打印_打印日志时 Logback 内部都做了些什么
- jsapi支付签名_小程序开发之微信支付
- c语言if怎么结束_07if与循环案例超经典C语言
- android des ecb加密_Android逆向 | 基础知识篇 01
- vue-router学习第一天
- java rcfile,hsqldb sqltool rcfile不起作用
- innodb逻辑存储结构