动态规划练习解答.pptVIP

动态规划练习解答 2010、11、6 WZL 1、仓库库存价值(cangku) [问题描述]： 有一个仓库库存物品。一天要从外面进货共有n 种物品，每个物品有一个重量及一个价值。但每种物品的数量是无限的，仓库的库存容积有限，最大库存容量为M，今从n 种物品中选取若干件(同一种物品可以多次选取)，使其体积的和小于等于M，而其库存价值的和为最大。 输入：第一行：两个整数，N (物品数量，N=30) 和 M (仓库容量，M=1000) ；用一个空格隔开。 第2..N+1 行：每行二个整数Wi, Ui，表示每个物品的体积和价值。 输出：仅x行，第一行，表示最大总价值，第二行开始输出两个数，选取的物品号及个数（按物号从小到大输出）。两个数之间用一个空格隔开。 样例： 输入：cangku.in 4 12 2 1 3 3 4 5 7 9 输出：cangku.out 15 （最大价值） 3 3 (表示第三种货物取3个) 算法分析： 典型的背包问题算法： 选取物品、计算仓库的存储价值 Var w, u, k:array[1..100] of longint; f:array[0..100,0..2000] of longint; n,m,i,j:longint; begin assign(input,cangku.in); reset(input); assign(output,cangku.out); rewrite(output); readln(n, m); for i:=1 to n do readln(w[i], u[i]); for i:=0 to n do for j:=0 to m do f[i,j]:=0; for i:=1 to n do for j:=1 to m do if (j-w[i]=0) and (f[i-1,j]f[i,j-w[i]]+u[i]) then f[i,j]:=f[i,j-w[i]]+u[i] else f[i,j]:=f[i-1,j]; writeln(f[n,m]); i:=n; j:=m; while i=1 do begin k[i]:=0; while (j=0) and (f[i,j]f[i-1,j]) do begin k[i]:=k[i]+1; j:=j-w[i]; end; i:=i-1; end; for i:=1 to n do if k[i]0 then writeln(i, ,k[i]); close(input); close(output); end. 2、最小乘车费用（work.pas） 假设某条街上每一公里就有一个公共汽车站，并且乘车费用如下表： 输出数据： 输出文件work.OUT，仅一行，包含一个整数，表示行使这么远所需要的最小费用。 样例输入： 12 21 31 40 49 58 69 79 90 101 15 样例输出： work.OUT 147 算法分析： Var a:array[1..10] of longint; b:array[0..10000] of longint; i,n,max,j:longint; begin assign(input,work.in); reset(input); assign(output,work.out); rewrite(output); For i:=1 to 10 do read(a[i]); readln(n); fillchar(b,sizeof(b),0); for i:=1 to n do begin max:=maxlongint; for j:=1 to 10 do if (i-j=0) and (a[j]+b[i-j]max) then max:=a[j]+b[i-j]; b[i]:=max; end; writeln(b[n]); close(input); close(output); end. 3、panda是个数学怪人，他非常喜欢研究跟别人相反的事情。