记录编号 123598 评测结果 AAAAAAAAAA
题目名称 嘉豪的减肥 最终得分 100
用户昵称 GravatarFoolMike 是否通过 通过
代码语言 Pascal 运行时间 0.989 s
提交时间 2014-09-28 13:50:44 内存使用 0.35 MiB
显示代码纯文本
var
m,n,m1,v,a,b:longint;
f:array[0..50000]of longint;
begin
assign(input,'jiahao2.in');
assign(output,'jiahao2.out');
reset(input);
rewrite(output);

read(m,n);
m:=m*10;
for n:=1 to n do
  begin
  read(m1,v);
  for a:=m-m1 downto 0 do
  if f[a+m1]<f[a]+m1*v then f[a+m1]:=f[a]+m1*v;
  end;

writeln(f[m]);
close(input);close(output);
end.