题目描述
有一个箱子容量为V(正整数,0<=V<=20000),同时有n个物品(0<n<=30,每个物品有一个体积(正整数)。
要求n个物品中,任取若干个装入箱内,使箱子的剩余空间为最小。
输入输出格式
输入格式:
一个整数,表示箱子容量
一个整数,表示有n个物品
接下来n行,分别表示这n 个物品的各自体积
输出格式:
一个整数,表示箱子剩余空间。
输入输出样例
输入样例#1:
24
6
8
3
12
7
9
7
输出样例#1:
0
说明
NOIp2001普及组 第4题
DP:
f[i,j]表示前i个物品在箱子重量为j时能放的最大体积。
j>=a[i] f[i,j]:=max(f[i-1,j],f[i-1,j-a[i]]+a[i])
j
var
i,j,n,m:longint;
f:array [0..31,0..20001] of longint;
a:Array [0..31] of longint;
begin
readln(m);
readln(n);
for i:=1 to n do readln(a[i]);
for i:=1 to n do
begin
for j:=1 to a[i]-1 do f[i,j]:=f[i-1,j];
for j:=a[i] to m do
if f[i-1,j]>f[i-1,j-a[i]]+a[i]
then f[i,j]:=f[i-1,j]
else f[i,j]:=f[i-1,j-a[i]]+a[i];
end;
writeln(m-f[n,m]);
end.