动动规划1.pptVIP

* 石子归并问题： N堆石子摆放成一列（N=100），现要将石子有次序地合并成一堆。规定每次只能选相邻的两堆合并成一堆，并将新的一堆的石子数记为该次合并的得分。 （1）选择一种合并石子的方案，使得做N-1次合并，得分的总和最小。 （2）选择一种合并石子的方案，使得做N-1次合并，得分的总和最大。 4 9 5 4 4 14 4 18 4 22 14 18 22 54 1………..i,i+1…..…….n mx[i..j]｛i..j区间石子归并的最大得分｝ ＝max{mx[i..k]+mx[k+1..j]+s[i..k]+s[k+1..j]} (i=kj) 证明：反证法 假设最大得分mx不是由上式得到的，且最后一次合并是[1..j]与[j+1,n]合并，即： mx[1..n]＝mx1[1..j]+mx1[j+1..n]+s[1..j]+s[j+1..n] max{mx[1..j]+mx[j+1..n]+s[1..j]+s[j+1..n]} 则：mx1[1..j]mx[1..j] mx1[j+1..n]mx[j+1..n] 必有一个不等式成立，与mx是最大得分矛盾。 故原结论成立。 program stone; const mx=100; Var｛max[i,l]表示从i开始的l堆石子归并的最大得分｝ n,i,j,l:integer; sum:array[0..mx]of integer;｛sum[i]表示前i堆的总石子数｝ max:array[1..mx,1..mx]of integer; begin assign(input,stone.in); reset(input); assign(output,stone.out); rewrite(output); readln(n); fillchar(sum,sizeof(sum),0); fillchar(max,sizeof(max),0); for i:=1 to n do begin read(j); sum[i]:=sum[i-1]+j; end; for l:=2 to n do for i:=1 to n-l+1 do for j:=1 to l-1 do if max[i,l]max[i,j]+max[i+j,l-j]+sum[i+l-1]-sum[i-1] then max[i,l]:=max[i,j]+max[i+j,l-j]+sum[i+l-1]-sum[i-1]; writeln(max[1,n]); close(input); close(output); end. 整数划分（huafen） 给出N个正整数，把它划分为两部分，并满足以下规则： （1）。两部分的个数最多只能差1； （2）。两部分数的和尽可能地接近； 求出划分后的每部分数的和。 输入文件（huafen.in）： 第一行：N（1=n=200），表示正整数的个数； 以下N行，每行一个正整数（=40）。 输出文件（huafen.out）： 一行：包含两个数，即各部分数的和。较小的在前面，中间用一个空格隔开。 对比：石子合并 你有N堆石头质量分别为W1,W2,W3...Wn.(Wi＜＝100000)现在需要你将石头合并为两堆，使两堆质量的差的绝对值为最小。 输入： 第一行为整数N（1=N=20），表示有N堆石子。接下去N行，为每堆石子的质量。 输出：一行。只需输出合并后两堆的质量差的绝对值的最小值。? 样例输入： 5 5 8 13 27 14 样例输出： 3 ? 石子合并问题：由于规模较小(N=20)，可以考虑搜索算法。初始状态为两堆均空，差值为W总。以第一对为研究对象，每堆石子要么被合并到第一堆，要么不被合并到第一堆。 状态：阶段数i，当前总质量W； 搜索过程中计算当前的差值并更新最小差值，当W= W总 div 2时回溯。 当然，搜索过程还可以进一步剪枝优化，但问题规模较小（共有220种状态），效果可能并不明显。 整数划分： N=200，搜索无法在规定时间内出解。 定义布尔函数： f(i,j,k)表示从给定的前i个数中选择其中的j个能否得到和k，那么： f(i,j,k)=f(i-1,j,k) or f(i-1,j-1,k-ai) (1=i=n;1=j=n;0=k=a1+a2+···+an) 初始值f(i,0,0)=true; 则：使得f(n,(n+1) div 2,k))为true、距离((a1+a2+···+an) div 2)最近的k就是问题的解。 实现： 以递归函数实现，效率低甚至堆栈溢出； 非递归方式： 以三维数组f来记录函数的值，则需200*200*(200*40)个存储空间。 观察f(i,