记录编号	273287	评测结果	AAAAAAAAAAA
题目名称	[USACO Oct09] Bessie 的体重问题	最终得分	100
用户昵称	zeppoe	是否通过	通过
代码语言	Pascal	运行时间	0.084 s
提交时间	2016-06-20 14:12:30	内存使用	0.35 MiB

var
f:array[0..50000]of longint;
m,n,p,i,j:longint;
begin
assign(input,'diet.in');
assign(output,'diet.out');
reset(input);
rewrite(output);
readln(m,n);
for i:=1 to n do
begin
readln(p);
for j:=m downto p do
if f[j-p]+p>f[j] then f[j]:=f[j-p]+p;
end;
writeln(f[m]);
close(input);
close(output);
end.