题目描述 Description
有一个箱子容量为V（正整数，0＜＝V＜＝20000），同时有n个物品（0＜n＜＝30，每个物品有一个体积（正整数）。
要求n个物品中，任取若干个装入箱内，使箱子的剩余空间为最小。
要求n个物品中，任取若干个装入箱内，使箱子的剩余空间为最小。
输入输出格式 Input/output
输入格式：
一个整数，表示箱子容量
一个整数，表示有n个物品
接下来n行，分别表示这n 个物品的各自体积
输出格式：
一个整数，表示箱子剩余空间。
一个整数，表示箱子容量
一个整数，表示有n个物品
接下来n行，分别表示这n 个物品的各自体积
输出格式：
一个整数，表示箱子剩余空间。
输入输出样例 Sample input/output
样例测试点#1
输入样例：
24
6
8
3
12
7
9
7
输出样例：
0
var v,n,i,j,max:longint;
a:array[1..30] of longint;
f:array[1..20000] of boolean; //表示是否可以到达
begin
readln(v);
readln(n);
for i:=1 to n do readln(a[i]);
f[0]:=true;
for i:=1 to n do
for j:=v-a[i] downto 0 do //01背包倒过来
if f[j] then f[j+a[i]]:=true; //如果f[j]可以到，那么f[j+a[i]]也可以到
for i:=v downto 1 do //倒过来找最大的可以到达的包
if f[i] then
begin
max:=i;
break;
end;
writeln(v-max);
end.