装箱问题 01背包

 

题目描述

有一个箱子容量为V（正整数，0＜＝V＜＝20000），同时有n个物品（0＜n＜＝30＝，每个物品有一个体积（正整数）。
要求n个物品中，任取若干个装入箱内，使箱子的剩余空间为最小。

输入格式

输入：
第一行是一个整数v，表示箱子容量
第二行是一个整数n，表示有n个物品
接下来n行，分别表示这n 个物品的各自体积

输出格式

一个整数，表示箱子剩余空间。

样例输入

24 6 8　 3 12 7 9 7

样例输出

0 <!--script src="http://www.rqnoj.cn/RQNOJ_PrintStatusWithPHP.asp?PID=147"-->

三维状态图像

 

var f,v:array[0..20000] of longint;
n,m,i,j,k,sum:longint;
function max(x,y:longint):longint;
begin
 if x>y then exit(x);
 exit(y);
end;
begin
 readln(m);
 readln(n);
 for i:=1 to n do
  readln(v[i]);
 for i:=1 to n do
  for j:=m downto v[i] do
   f[j]:=max(f[j],f[j-v[i]]+v[i]);
 writeln(m-f[m]);
end.