分组背包
Time Limit:10000MS Memory Limit:65536K Total Submit:65 Accepted:47 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
Source
var
c,w,f:array[0..1000]of longint;
a:array[0..100,0..100]of longint;
n,v,t,g,i,j,k:longint;
function max(a,b:longint):longint;
begin
if a>b then exit(a);
exit(b);
end;
begin
readln(v,n,t);
for i:=1 to n do
begin
readln(w[i],c[i],g);
inc(a[g,0]);//这个组的总数+1
a[g,a[g,0]]:=i;
end;
for i:=1 to t do//每个组只能拿一个=一共拿t个
for j:=v downto 0 do
for k:=1 to a[i,0] do
if j>=w[a[i,k]] then
f[j]:=max(f[j],f[j-w[a[i,k]]]+c[a[i,k]]);
writeln(f[v]);
end.