2011 年 9月 2 日随笔档案 - This_poet

POJ2455 Secret Milking Machine ——二分答案+网络流——Pku2455

摘要：思路：二分答案，用权值比二分出来的答案小的边来建图。网络流判定的是是否能够满足找到t条路径。CODEProgram Secret;//By_Poetshy Const maxn=40000; Var i,j,k,m,n,p,t,d :Longint; pre,other,last,data :Array[1..maxn*2]of Longint; a,b :Array[1..200]of Longint; v :Array[1..2... 阅读全文

posted @ 2011-09-02 21:12 This_poet 阅读(302) 评论(0) 推荐(0)

POJ2454 Jersey Politics ——贪心+随机化算法——Pku2454

摘要：初看此题时，显然大家都想到了贪心+搜索+剪枝，但是POJ的评测机是很不给力的，一定是TLE。所以，理所当然的，我们知道了random的威力。先证明一下贪心算法的正确性：策略：将这n*3个元素倒序快排一下，取前n*2个元素分为两组，最后n个元素分为一组。证明：如果不这样选的话，那么前两组的总和必会比这样选的情况小，那么更有可能失败。证毕。随机化算法：每次从前两个集合中各选一个元素进行交换，如果满足条件直接输出并halt.这个随机化的证明嘛，我也不会。CODEProgram POJ2454;//By_PoetshyConst maxn=200;Var i,j,k,m,n :Longint;... 阅读全文

posted @ 2011-09-02 21:05 This_poet 阅读(621) 评论(0) 推荐(0)

POJ2394 Checking an Alibi ——最短路——Pku2394

摘要：单源最短路的SPFA算法即可。CODEProgram Alibi;Const maxn=1000;Var i,j,k,m,n,f,p,c,o,r,d :Longint; pre,other,last,dist,data :Array[1..maxn*2]of Longint; ans,place :Array[1..maxn]of Longint; Procedure Spfa;var seq :Array[1..maxn*10]of Longint; h,t :Longint;begin h:=0;t:=1;seq[1]:=1; fillchar(dist,size... 阅读全文

posted @ 2011-09-02 20:56 This_poet 阅读(260) 评论(0) 推荐(0)

POJ2393 Yogurt factory ——贪心——Pku2393

摘要：贪心思想：维护每一个点上的两种决策：取这个点的价值还是取这个点前面权值最小的点的价值。取完这个点后，更新最小值并处理下一个点。证明：因为储存价值s固定，所以贪心策略成立。CODEProgram Yogfac;//By_PoetshyVar i,n,m :Longint; re,ans,p,q :Int64; BEGIN ans:=0; readln(n,m);re:=maxlongint>>1; for i:=1 to n do begin readln(p,q); inc(re,m); if re<p then inc(ans,re*q) else ... 阅读全文

posted @ 2011-09-02 20:54 This_poet 阅读(303) 评论(0) 推荐(0)

POJ2392 Space Elevator ——动态规划初步——Pku2392

摘要：此题为一般的动态规划，为可能性动态规划。初态只需将f[0]:=true;在所有都不小于a[i]的条件下进行动态规划。状态转移方程：f[j+c[i]]:=true (if (f[j]=true) and (j+c[i]<=a[i]))注意动态规划的顺序：一定要倒推，否则会造成重复。CODEProgram Elevator;//By_PoetshyConst maxn=40000;Var i,j,p,n,max,re :Longint; f :Array[0..maxn]of Boolean; h,c,a :Array[1..400]of Longint; Fun... 阅读全文

posted @ 2011-09-02 20:48 This_poet 阅读(243) 评论(0) 推荐(0)

2011年9月2日