开心的金明

题意

在不超过N元（可以等于N元）的前提下，使每件物品的价格与重要度的乘积的总和最大。

var n,m,i,j,v,p:longint; f:array[1..30001]of longint; begin     readln(n,m);     for i:=1 to m do      begin         readln(v,p);         p:=p*v;         for j:=n downto v do         if f[j]<f[j-v]+p then f[j]:=f[j-v]+p;     end;     writeln(f[n]); end.