完全背包：一维数组

题意

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

分析

f[j]:=max(f[j],f[j-w[i]]+p[i];

最大价值=f[m];

var
w,p:array[0..30]of longint;
f:array[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[j]>f[j-w[i]]+p[i] then f[j]:=f[j] else f[j]:=f[j-w[i]]+p[i];
        end;
    end;
    write(f[m]);
end.