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.