您的位置：首页 > 其它

vijos p1104(采药)（0-1背包）

2012-10-12 22:30 162 查看
今天DP第二道题，采药，其实就是背包问题，不知道要是没看教程会不会做，但是没有看源码编出来，也算是一个不小的进步，嘿嘿。

program P1104;
uses math;
var
t,v:array[1..1001] of longint;
f:array[0..1001,0..1001]of longint;
t1,m,i,j,k,l:longint;
begin
fillchar(f,sizeof(f),0);
read(t1,m);
for i:=1 to m do
read(t[i],v[i]);
for i:=1 to m do
for j:=1 to t1 do
if j>=t[i] then
f[i,j]:=max(f[i-1,j-t[i]]+v[i],f[i-1,j])
else f[i,j]:=f[i-1,j];
write(f[m,t1]);
end.
内容来自用户分享和网络整理，不保证内容的准确性，如有侵权内容，可联系管理员处理 点击这里给我发消息
标签： 
相关文章推荐
新的分享
章节导航