题解 P1910 【L国的战斗之间谍】
非常简单的01二维背包问题,只要知道了公式就可以了。
var a:array[0..1001,0..1001] of longint;
n,m,k,i,j,x,y,z,l:longint;
begin
readln(n,m,k);
for i:=1 to n do
begin
readln(x,y,z);
for j:=m downto y do //能力
for l:=k downto z do //钱
if a[j,l]<a[j-y,l-z]+x then
a[j,l]:=a[j-y,l-z]+x; //套公式
end;
writeln(a[m,k]); //输出
end.