[CODEVS1014]装箱问题

时间:2022-04-24 21:07:42

题目描述 Description
有一个箱子容量为V(正整数,0<=V<=20000),同时有n个物品(0<n<=30),每个物品有一个体积(正整数)。

要求n个物品中,任取若干个装入箱内,使箱子的剩余空间为最小。

输入描述 Input Description
一个整数v,表示箱子容量

一个整数n,表示有n个物品

接下来n个整数,分别表示这n 个物品的各自体积

输出描述 Output Description
一个整数,表示箱子剩余空间。

样例输入 Sample Input
24

6

8

3

12

7

9

7

样例输出 Sample Output
0

var a:array[..] of longint;
f:array[..] of longint;
maxx,n,i,j:longint;
function max(x,y:longint):longint;
begin
if x>y then exit(x) else exit(y);
end;
begin
readln(maxx);
readln(n);
for i:= to n do read(a[i]);
for i:= to n do
for j:=maxx downto a[i] do
f[j]:=max(f[j-a[i]+a[i],f[j]);
writeln(maxx-f[maxx]);
end.