完全背包:二维数组

题意

设有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.