完全背包:二维数组

题意

设有n 种物品，每种物品有一个重量及一个价值。但每种物品的数量是无限的，同时有一个背包，最大载重量为M，今从n 种物品中选取若干件(同一种物品可以多次选取)，使其重量的和小于等于M，而价值的和为最大。

分析

公式：f[i,j]:=max(f[i-1,j],f[i,j-w[i]]+p[i];

      最大价值=f[n,m]

var
w,p:array[0..30]of longint;
f:array[0..40,0..300]of longint;
n,m,i,j:longint;
begin
    readln(m,n);
    for i:=1 to n do
    readln(w[i],p[i]);
    fillchar(f,sizeof(f),0);
    for i:=1 to n do
    begin
        for j:=0 to m do
        begin
            if (j>=w[i]) then
            if f[i-1,j]>f[i,j-w[i]]+p[i] then f[i,j]:=f[i-1,j] else f[i,j]:=f[i,j-w[i]]+p[i];
        end;
    end;
    write(f[n,m]);
end.