机器分配

题意

总公司拥有高效生产设备M台，准备分给下属的N个公司。各分公司若获得这些设备，可以为国家提供一定的盈利。问：如何分配这M台设备才能使国家得到的盈利最大？求出最大盈利值。其中M《=15，N〈=10。分配原则：每个公司有权获得任意数目的设备，但总台数不得超过总设备数M。

分析

f[i,j]表示前i个公司分配j个机器的最大盈利

f[i,j]:=max(f[i,j],f[i-1,k]+a[i,j-k]);

注意：一定要看懂输入，一开始我就是把输入理解错了。

var m,n,i,j,k:longint; f,a:array[0..16,0..11]of longint; begin     readln(m,n);     for i:=1 to m do     begin         for j:=1 to n do         read(a[j,i]);         readln;     end;     fillchar(f,sizeof(f),#0);     for i:=1 to n do     for j:=1 to m do     for k:=0 to j do     if f[i-1,k]+a[i,j-k]>f[i,j] then f[i,j]:=f[i-1,k]+a[i,j-k];     write(f[n,m]); end.