(ssl2291)分组背包

最新推荐文章于 2024-06-27 17:57:09 发布

原创最新推荐文章于 2024-06-27 17:57:09 发布 · 481 阅读

1 ·

CC 4.0 BY-SA版权

SSL水题收割机(上课作业) 专栏收录该内容

53 篇文章

订阅专栏

本文介绍了一种特殊的背包问题——分组背包问题。该问题中物品被分成多个组，每组只能选择一个物品放入容量受限的背包内。文章提供了一个具体的实例，包括输入输出样例及解决此问题的伪代码，旨在帮助读者理解并掌握分组背包问题的求解方法。

分组背包

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

Sample Output

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.