讨论 / 这样的也能当第四题?——标准dp,最简代码
rt 2019-05-08 21:11:45
点我顶贴 收藏 删除
var

t,m,i,j:longint;

w,c:array[1..100] of longint;

f:array[0..1000] of longint;

function max(x,y:longint):longint;

begin

if x>y then exit(x);

exit(y);

end;

begin

readln(t,m);

for i:=1 to m do

readln(w[i],c[i]);

for i:=1 to m do

for j:=t downto w[i] do

f[j]:=max(f[j],f[j-w[i]]+c[i]);

writeln(f[t]);

end.

#1 rt@2019-05-08 21:12:21
回复 删除
这里的码风真丑!!!
查看更多回复
提交回复