題目描述辰辰是個天資聰穎的孩子，他的夢想是成為世界上最偉大的醫師。為此，他想拜附近最有威望的醫師為師。醫師為了判斷他的資質，給他出了乙個難題。醫師把他帶到乙個到處都是草藥的山洞裡對他說：「孩子，這個山洞裡有一些不同的草藥，採每一株都需要一些時間，每一株也有它自身的價值。我會給你一段時間，在這段時間裡，你可以採到一些草藥。如果你是乙個聰明的孩子，你應該可以讓採到的草藥的總價值最大。」
如果你是辰辰，你能完成這個任務嗎？
輸入輸出格式
輸入格式：
輸入檔案medic.in的第一行有兩個整數t（1 <= t <= 1000）和m（1 <= m <= 100），用乙個空格隔開，t代表總共能夠用來採藥的時間，m代表山洞裡的草藥的數目。接下來的m行每行包括兩個在1到100之間（包括1和100）的整數，分別表示採摘某株草藥的時間和這株草藥的價值。
輸出格式：
輸出檔案medic.out包括一行，這一行只包含乙個整數，表示在規定的時間內，可以採到的草藥的最大總價值。
2維
varw,a:array[1..100]of longint;
f:array[0..100,0..1000]of longint;
i,j,n,m:longint;
function max(a,b:longint):longint;
begin
if a>=b then exit(a);
exit(b);
end;
begin
read(m,n);
for i:=1 to n do
read(w[i],a[i]);
fillchar(f,sizeof(f),0);
f[0,m]:=0;
f[1,0]:=0;
for i:=1 to n do
for j:=1 to m do
if j>=w[i] then f[i,j]:=max(f[i-1,j],f[i-1,j-w[i]]+a[i])
else f[i,j]:=f[i-1,j];
write(f[i,j]);
end.
轉移方程f[i,j]:=max(f[i-1,j],f[i-1,j-w[i]]+a[i,j])
1維var
w,a:
array[1.
.100
]of longint;
f:array[0.
.1000
]of longint;
i,j,n,m,k:longint;
function max
(a,b:longint):longint
;begin
ifa>=
b then exit
(a);
exit
(b);
end;
begin
read
(m,n)
;for
i:=1
to n do
read
(w[i],a[i])
;fillchar(f,
sizeof
(f),0);
fori:=
1to n
dofor
j:=m downto 0do
ifj>=w[i] then f[j]:=max(f[j],f[j-w[i]]+a[i])
else
f[j]:=f[j]; write(f[m]);
end.
轉移方程f[i]:=max(f[j],f[j-w[i]]+a[i])
採藥 01揹包
from silence 採藥 背景 background noip2005複賽普及組第三題 描述 description 辰辰是個天資聰穎的孩子，他的夢想是成為世界上最偉大的醫師。為此，他想拜附近最有威望的醫師為師。醫師為了判斷他的資質，給他出了乙個難題。醫師把他帶到乙個到處都是草藥的山洞裡對他說...
採藥（01揹包）
fjut 2347 problem description 辰辰是個天資聰穎的孩子，他的夢想是成為世界上最偉大的醫師。為此，他想拜附近最有威望的醫師為師。醫師為了判斷他的資質，給他出了乙個難題。醫師把他帶到乙個到處都是草藥的山洞裡對他說 孩子，這個山洞裡有一些不同的草藥，採每一株都需要一些時間，每一...
01揹包 採藥
辰辰是個天資聰穎的孩子，他的夢想是成為世界上最偉大的醫師。為此，他想拜附近最有威望的醫師為師。醫師為了判斷他的資質，給他出了乙個難題。醫師把他帶到乙個到處都是草藥的山洞裡對他說 孩子，這個山洞裡有一些不同的草藥，採每一株都需要一些時間，每一株也有它自身的價值。我會給你一段時間，在這段時間裡，你可以採...