分组背包
Time Limit:10000MS Memory Limit:65536K
Total Submit:60 Accepted:44
Case Time Limit:1000MS
Description
有N件物品和一个容量为V的背包。第i件物品的费用是c[i],价值是w[i]。这些物品被划分为若干组,每组中的物品互相冲突,最多选一件。求解将哪些物品装入背包可使这些物品的费用总和不超过背包容量,且价值总和最大。
Input
第一行:三个整数,v(背包容量,v<=200),n(物品数量,n<=30)和t(最大组号,t<=10);
第2..n+1行:每行三个整数wi,ci,p,表示每个物品的重量、价值、所属组号。
Output
仅一行,一个数,表示最大总价值。
Sample Input
10 6 3
2 1 1
3 3 1
4 8 2
6 9 2
2 8 3
3 9 3
Sample Output
20
-
var w,c:array[0..101] of longint; f:array[0..1001] of longint; a:array[1..10,0..101] of longint; n,m,j,k,l,i,v,p,t:longint; begin readln(v,n,t); for i:=1 to n do begin readln(w[i],c[i],p); inc(a[p,0]); a[p,a[p,0]]:=i; end; for i:=1 to t do for j:=v downto 0 do for k:=1 to a[i,0] do if j>=w[a[i,k]] then if f[j-w[a[i,k]]]+c[a[i,k]]>f[j] then f[j]:=f[j-w[a[i,k]]]+c[a[i,k]]; write(f[v]); end.