SSL 2295 暗黑破壞神

description

無聊中的小x玩起了diablo i…

遊戲的主人公有n個魔法

每個魔法分為若干個等級，第i個魔法有p[i]個等級(不包括0)

每個魔法的每個等級都有乙個效果值，乙個j級的i種魔法的效果值為w[i][j]

魔法公升一級需要一本相應的魔法書

購買魔法書需要金幣，第i個魔法的魔法書**為c[i]

而小x只有m個金幣(好孩子不用修改器)

你的任務就是幫助小x決定如何購買魔法書才能使所有魔法的效果值之和最大

開始時所有魔法為0級 效果值為0

input

第一行 用空格隔開的兩個整數n(0

以下n行 描述n個魔法

第i+1行描述 第i個魔法 格式如下(0

c[i] p[i] w[i][1] w[i][2] … w[i][p[i]]

output

第一行輸出乙個整數，即最大效果

sample input

3 10

1 3 1 2 2

2 3 2 4 6

3 3 2 1 10

sample output

11 1

0 3

hint

0< n< =100,0< m <=500,0 < p[i] <= 50,0 < c[i] <=10

簡單的揹包，主要就是記錄路徑，再遞迴輸出

**如下:

const

maxn=500;
var f,a,b:array[0..maxn,0..maxn] of longint;
c,p:array[0..maxn] of longint;
i,j,k,n,m,maxf,x,y:longint;
procedure
print
(x,y:longint);
begin
if x=0
then
exit;
print(x-1,y-b[x,y]*c[x]);
writeln(b[x,y]);
end;
function
max(x,y:longint):longint;
begin
if x>y then
exit(x) else
exit(y);
end;
begin
readln(n,m);
for i:=1
to n do
begin
read(c[i],p[i]);
for j:=1
to p[i] do
read(a[i,j]);
readln;
end;
for i:=1
to n do
for j:=1
to m do
begin
f[i,j]:=f[i-1,j];
for k:=0
to p[i] do
begin
if k*c[i]>j then
break;
if f[i,j]1,j-k*c[i]]+a[i,k] then
begin
f[i,j]:=f[i-1,j-k*c[i]]+a[i,k];
b[i,j]:=k;
end;
end;
end;
writeln(f[n,m]);
for j:=m downto1do
for i:=n downto1do
if f[i,j]>=maxf then
begin
maxf:=f[i,j];
x:=i;
y:=j;
end;
print(x,y);
for i:=x+1
to n do
writeln(0); 
end.

暗黑破壞神（ssl 2295）

暗黑破壞神 ssl 2295 無聊中的小x玩起了diablo i.遊戲的主人公有n個魔法 每個魔法分為若干個等級，第i個魔法有p i 個等級 不包括0 每個魔法的每個等級都有乙個效果值，乙個j級的i種魔法的效果值為w i j 魔法公升一級需要一本相應的魔法書 購買魔法書需要金幣，第i個魔法的魔法書 ...

SSL2295 暗黑破壞神 dp

暗黑破壞神 description 無聊中的小x玩起了diablo i.遊戲的主人公有n個魔法 每個魔法分為若干個等級，第i個魔法有p i 個等級 不包括0 每個魔法的每個等級都有乙個效果值，乙個j級的i種魔法的效果值為w i j 魔法公升一級需要一本相應的魔法書 購買魔法書需要金幣，第i個魔法的魔...

ssl2295 暗黑破壞神 dp練習

題目 無聊中的小x玩起了diablo i.遊戲的主人公有n個魔法 每個魔法分為若干個等級，第i個魔法有p i 個等級 不包括0 每個魔法的每個等級都有乙個效果值，乙個j級的i種魔法的效果值為w i j 魔法公升一級需要一本相應的魔法書 購買魔法書需要金幣，第i個魔法的魔法書 為c i 而小x只有m個...