nike0good |Oier&ACMer | 熟能生巧

有所作为是生活中的最高境界。

POJ 1611(并查集)

唯一的WA 是把0的父亲当成祖先 father[x]和getfather(x)差别巨大啊 Program p1611; const maxn=30010; maxm=500; var n,m,i,j,k,p1,p2,ans,f0:longint; father...

2012-09-30 21:11:47

阅读数 790

评论数 0

POJ 2271(HTML)

这题字符串处理 注意Seekeof会自动把后面的空格吃掉(有时遇到回车,后面会漏一个空格……貌似有时没空格也会读到,字符串处理时慎用) 另外 空格的Ascii码是32,31及以下都是不可输入字符 program P2271; var s:string; procedur...

2012-09-29 14:02:50

阅读数 770

评论数 0

POJ 1700(过河问题)

玩过《雷顿》就知道这题可以贪心 小等于2人:1,2-> 3人时: 1,3-> 1 1,2-> 1 否则: 1,2-> 2 max1,max2-> 1 OR: 1,max1-> 1 2,max2-> 2 于是数据规模...

2012-09-29 13:55:17

阅读数 705

评论数 0

POJ 1125(Floyd)

裸Floyd Program P1125; const maxn=100; maxedge=10; NULL=-2139062144; var n,i,j,k,m,v,t,ans:longint; f:array[1..maxn,1..maxn] of lo...

2012-09-28 17:41:59

阅读数 1001

评论数 0

POJ 3842(质数判断)

7!=5040 所以这题直接求质数比打一千万的表都快 这提高诉我们阶乘其实不算大&看(算)清数据规模 Program cc; var n,t,len,i,j,ans:longint; s:string; b:array[0..9] of longint; p...

2012-09-24 21:34:33

阅读数 954

评论数 0

CF 187A(从后取数的重排数列)

题目大意:一串数,每次把最后那个数挪到前面任意位置,就最少挪动次数 显然一个数最多挪一次(只能从后取的话,插2次的一定能变成1次) 因此找最后挪动的数即可,最后挪动的数即由于与下序列的连线与之前的交叉,其它数无论怎么挪都无法影响到它) Program DD; const max...

2012-09-23 22:17:20

阅读数 876

评论数 0

POJ 2588(解析几何+并查集)

题目就是早从左到右的路 注意输入的实数 这题图画好就行,别像我一开始把图弄反就成 从上开始找,若找到一个与下边界相邻的就无解,找到与左边相邻的记圆与左边界相交的下边的点(相当于左上角挖去一块),右边同理。 Program snake; const maxn=1000; v...

2012-09-23 19:36:30

阅读数 844

评论数 0

POJ 3122(二分答案)

二分答案…… Program pie; const lef=0.00001; var t,n,f,i,j:longint; r:array[1..10000] of longint; s:array[1..10000] of double; maxs:dou...

2012-09-23 16:06:52

阅读数 1255

评论数 0

POJ 3844(同余)

果断同余…… D[j]-D[i]  mod  k =0 D[j]=D[i] 求有多少相等数对,用队列O(n) Program P3844; const maxn=50000; maxd=1000000; var ans,t,f,n,i,j:longint; ...

2012-09-23 16:04:44

阅读数 1237

评论数 0

POJ 2184(01背包+滚动数组)

01背包 模板题 Program dd; const maxn=1000; maxv=100000; minv=-100000; NULL=-2139062144; var n,i,j,ans,p,np:longint; ts,tf:array[1...

2012-09-22 14:28:04

阅读数 707

评论数 0

POJ 2110(最小生成树)

这题的思路就是找一个范围,看看这个范围是否可行 主流是二分Ans,我是先把点排序,求最小生成树检查首位的 Program P2110; type ed=record u,v,w:longint; end; var a:array[1..120,1.....

2012-09-21 17:52:40

阅读数 753

评论数 0

POJ 1952(最长不下降子序列的个数)

求一个序列的最长不下降子序列的长度,与个数(相同数列算1个) 关键是如何判重。 显然如果之前有一个尾数相同且长度相同的序列,哪么后一个包含前一个所有可能的序列相同的序列,故将前一个序列删除(重复) Program P1952; var n,i,j,ans:longint; ...

2012-09-15 22:52:59

阅读数 1172

评论数 0

POJ 1951(空串特判)

这题的教训是 要特判空串 Program P1951; var s:string; len,i,j:longint; b:array[0..10000] of boolean; function isdight(x:longint):boolean; begin ...

2012-09-15 17:39:09

阅读数 2404

评论数 0

POJ 1950(不打表做法)

这题就是搜…… 注意设定maxn 要不然肯定爆 maxn=1*10^最大位数/2 1234..89-11121314这样的 Program aa; const maxn=1000000000000000; var n,t:longint; a:array[1..15] of ...

2012-09-15 17:36:55

阅读数 735

评论数 0

POJ 3278(BFS-搜索范围)

这题是BFS水的 主要是范围 0 半天功夫才A. program P3278; const maxn=200000; var n,k,i,j:longint; q,deep:array[1..maxn] of longint; b:array[0..maxn...

2012-09-15 13:24:51

阅读数 908

评论数 0

POJ 3256(SPFA)

这题只能对每一个点查一遍…… 有向图的话能用floyd,可是迫于时限用了SPFA。 Program aa; const maxk=10000; maxn=10000; maxm=10000; var k,n,m,i,j,l:longint; a:a...

2012-09-15 08:07:41

阅读数 804

评论数 0

POJ 3692(匈牙利算法)

匈牙利算法: b[]保存当前找交错路P的各点是否已被连通,a[]表示某点之前的点 本题的2分图是取最大团(各点互相连通),利用2分图性质,可看成补图的最大独立集(各点互不连通)…… Program P3692; const maxn=200; var n,m,l...

2012-09-14 13:53:01

阅读数 963

评论数 0

HYSBZ 1050(队列-大小边比值最大的路径)

已知边,判断2点连通性 要用并查集……千万别搜啊~ Program ee; var edge:array[1..10000,1..3] of longint; s,t,n,m,i,j,pmax,pmin:longint; father:array[1..1000] o...

2012-09-11 17:51:54

阅读数 647

评论数 0

HYSBZ 1616(纯深搜)

题目大意:一张图G,有一些障碍物,求路径长度一定(可环)时的路径总数 果断广搜 Program ttd; var n,m,t,i,j,k,x1,x2,y1,y2:longint; s:string; b:array[0..101,0..101] of bool...

2012-09-08 17:12:32

阅读数 1728

评论数 0

HYSBZ 1601(单点带值的最小生成树)

题目大意:最小生成树 建源点0与各点连线的权为建水库的大小。 Program aa; var n,i,j,p:longint; u,v,w:array[0..100000] of longint; size,cost:longint; father:array[...

2012-09-08 17:08:27

阅读数 725

评论数 0

提示
确定要删除当前文章?
取消 删除