POJ3265 Problem Solving ——动态规划——Pku3265

比较巧妙的动态规划。用f[i][j]表示第i个月，总工作了j道题目（从1~j），所能剩余的最多钱数。

状态转移方程如下：

f[i][j]=Max(m-∑b[j]-∑b[k]){其中，k应当满足f[i-1][k]>=∑a[j]-∑a[k]}

注意最后输出的应该是ans+1，因为第一个月实际上是没有收入的。

代码：

Program Psolve;//By_Thispoet
Const
	maxn=300;
Var
	i,j,k,m,n,p,q,ans					:Longint;
	a,b									:Array[0..maxn]of Longint;
	f									:Array[0..maxn*2,0..maxn]of Longint;
	
Function Max(i,j:Longint):Longint;
begin
	if i>j then exit(i);exit(j);
end;


BEGIN

	readln(m,n);
	for i:=1 to n do
		begin
			readln(a[i],b[i]);
			inc(a[i],a[i-1]);
			inc(b[i],b[i-1]);
		end;

	fillchar(f,sizeof(f),128);
	f[1,0]:=m;
	ans:=1;
	while true do
		begin
			inc(ans);
			for j:=1 to n do
				for k:=j downto 0 do
					begin
						if (f[ans-1][k]>=a[j]-a[k])and(m>=b[j]-b[k]) then
							f[ans,j]:=Max(f[ans,j],m-b[j]+b[k]);
						if f[ans,j]=m then break;
					end;
			if f[ans,n]>=0 then break;
		end;

	writeln(ans+1);

END.