BZOJ1606: [Usaco2008 Dec]Hay For Sale 购买干草

1606: [Usaco2008 Dec]Hay For Sale 购买干草

Time Limit: 5 Sec  Memory Limit: 64 MB
Submit: 612  Solved: 463
[Submit][Status]

Description

    约翰遭受了重大的损失:蟑螂吃掉了他所有的干草,留下一群饥饿的牛.他乘着容量为C(1≤C≤50000)个单位的马车,去顿因家买一些干草.  顿因有H(1≤H≤5000)包干草,每一包都有它的体积Vi(l≤Vi≤C).约翰只能整包购买,
他最多可以运回多少体积的干草呢?

Input

    第1行输入C和H,之后H行一行输入一个Vi.

Output

 
    最多的可买干草体积.

Sample Input

7 3 //总体积为7,用3个物品来背包
2
6
5


The wagon holds 7 volumetric units; three bales are offered for sale with
volumes of 2, 6, and 5 units, respectively.

Sample Output

7 //最大可以背出来的体积

HINT

 

Buying the two smaller bales fills the wagon.

 

Source

题解:
判定性背包。。。
美国08年还考这种题?
代码:
 1 var
 2     i,j,m,x,n:longint;
 3     f:array[0..100000]of boolean;
 4 begin
 5         assign(input,'input.txt');assign(output,'output.txt');
 6         reset(input);rewrite(output);
 7         readln(m,n);
 8         f[0]:=true;
 9     for i:=1 to n do
10     begin
11       readln(x);
12       for j:=m downto x do
13        f[j]:=f[j] or (f[j-x]);
14     end;
15     for i:=m downto 0 do if f[i] then break;
16         writeln(i);
17         close(input);close(output);
18 end.
19         
View Code

 

posted @ 2014-08-12 13:50  ZYF-ZYF  Views(216)  Comments(0Edit  收藏  举报