摘要: 今天很闲,整理一下最近写的很有代表性的题目,拿出来晒晒,勿喷、勿喷呃…… 去年刚刚看到这个题目,愣是没有想出什么办法来,只感觉是个纯数学题,限于水平没有敢写。今年又翻出来看,结果想到了一个简单的办法(再次Orz dxh大神的纯数学方法…) 关于这道题目,里面的积木覆盖顺序一定是前面的挡住后面的,右边的挡住左边的,那么就可以用一个模拟放置积木的算法来画图。当然,放置的顺序是从后往前,从左往右。至于... 阅读全文
posted @ 2011-10-25 08:04 NoRush 阅读(364) 评论(0) 推荐(0) 编辑
摘要: 第一次写这种字符串距离型DP,本来DP题目做得就少,权当练习。 这个题目要求字符串A、B扩展串的最短距离 用f[i,j]表示A到i位置,B到j位置的最短距离,则f[i,j]=min{f[i-1,j]+k,f[i,j-1]+k,f[i-1,j-1]+d} 其中d为A[i]与B[j]的ASCII码距离的差的绝对值,即d=abs(ord(a[i])-ord(b[j])),k为题目... 阅读全文
posted @ 2011-10-25 07:53 NoRush 阅读(249) 评论(0) 推荐(0) 编辑
摘要: 各种不解释,建图再拓扑判断是否可行 Var map:array[1..40,1..40,0..9]of longint; g,w:array[1..40,1..40]of longint; v,ind:array[-1..19]of longint; q:array[1..10000]of longint; cz:array... 阅读全文
posted @ 2011-10-14 19:11 NoRush 阅读(197) 评论(0) 推荐(0) 编辑
摘要: POJ1861 & ZOJ1542[Network] ZOJ 1203[Swordfish] POJ 1251[Jungle Roads] POJ2031 & ZOJ1718[Building a Space Station] POJ 2421[Constructing Roads] POJ 2349[Arctic Network] POJ 1789[Truck History] P... 阅读全文
posted @ 2011-10-14 17:44 NoRush 阅读(333) 评论(0) 推荐(0) 编辑
摘要: 这个题的样例让我大呼坑爹——竟然把Special Judge上的各种情况融合在了一个样例上……再次Orz 这个题就是个MST,但是题目要求是生成树中的最长边最小,所以要用Kruskal,因为Kruskal的算法保证了最小生成树中的最长边最小。 Var a,b,e,f,optx,opty:array[-1..15100]of longint; n,m,max,ans,... 阅读全文
posted @ 2011-10-14 17:43 NoRush 阅读(266) 评论(0) 推荐(0) 编辑
摘要: 开始在各大OJ刷水题。这是一个MST,只是输入数据的时候需要重新构图,其他没什么 p.s. Var a,b,f:array[-1..100000]of longint; e,xx,yy:array[-1..100000]of extended; n,m,cases:longint; sum:extended;Procedure addg... 阅读全文
posted @ 2011-10-14 17:42 NoRush 阅读(254) 评论(0) 推荐(0) 编辑
摘要: 还是个MST,不过这个读入数据让用Pascal的童鞋很郁闷的说…… Var a,b,e,f:array[1..100000]of longint; n,m,sum,ans:longint;Procedure addgraph(ch1,ch2:char;cost:longint); begin inc(m); a[m]:=ord(ch1)-6... 阅读全文
posted @ 2011-10-14 17:42 NoRush 阅读(131) 评论(0) 推荐(0) 编辑
摘要: MST,不过这个题用Prim可能会快点,表示我写的Kruskal。 两点之间的距离如果比两点半径和小那么建图时把两点距离置为0,这样就保证了重叠和相交的情况。 Var a,b,f:array[1..11000]of longint; e,x,y,z,r:array[1..10000]of extended; n,ans,m:longint; ... 阅读全文
posted @ 2011-10-14 17:41 NoRush 阅读(254) 评论(0) 推荐(0) 编辑
摘要: 不解释的MST,把已经有道路的两个村庄之间建一条长度为0的边,然后Kruskal。我开始是把已经有路的村庄合并,WA了 p.s.这个题的Discuss里面楼要倒了…… Var a,b,e,f:array[1..100000]of longint; n,m,sum,ans:longint;Procedure addgraph(x,y,z:longint); begin... 阅读全文
posted @ 2011-10-14 17:40 NoRush 阅读(193) 评论(0) 推荐(0) 编辑
摘要: 这个题Prim是比较快的,用Kruskal要700+ms,幸亏时限是2000ms…… 这个题就是建图之后求最小生成树中第p-s小的那条边,用kruskal比较容易理解~ Var a,b,f,x,y:array[1..1000000]of longint; e:array[1..1000000]of extended; n,m,ans,p,s,fu,i:... 阅读全文
posted @ 2011-10-14 17:36 NoRush 阅读(260) 评论(0) 推荐(0) 编辑