3997: [TJOI2015]组合数学

3997: [TJOI2015]组合数学

Time Limit: 20 Sec  Memory Limit: 128 MB
Submit: 247  Solved: 174
[Submit][Status][Discuss]

Description

给出一个网格图，其中某些格子有财宝，每次从左上角出发，只能向下或右走。问至少走多少次才能将财宝捡完。此对此问题变形，假设每个格子中有好多财宝，而每一次经过一个格子至多只能捡走一块财宝，至少走多少次才能把财宝全部捡完。

 

Input

第一行为正整数T，代表数据组数。

每组数据第一行为正整数N，M代表网格图有N行M列，接下来N行每行M个非负整数，表示此格子中财宝数量，0代表没有

Output

输出一个整数，表示至少要走多少次。

 

Sample Input

1
3 3
0 1 5
5 0 0
1 0 0

Sample Output

10

HINT

N<=1000,M<=1000.每个格子中财宝数不超过10^6

Source

题解：论一个怎麽看怎么像最小割的题是怎样水成DP的= =

其实成了求从右上到左下的最大权路径= =，然后就是个Dp水过（虽然具体没有很明白为啥= =）

 /**************************************************************
     Problem:
     User: HansBug
     Language: Pascal
     Result: Accepted
     Time: ms
     Memory: kb
 ****************************************************************/

 var
    i,j,k,l,m,n:longint;
    a,b:array[..,..] of longint;
 function max(x,y:longint):longint;
          begin
               if x>y then max:=x else max:=y;
          end;
 begin
      readln(l);
      while l> do
            begin
                 readln(n,m);
                 for i:= to n do
                     begin
                          for j:=m downto  do read(b[i,j]);
                          readln;
                     end;
                 for i:= to n+ do a[i,]:=;
                 for i:= to m+ do a[,j]:=;
                 for i:= to n do
                     for j:= to m do
                         a[i,j]:=max(a[i-,j-]+b[i,j],max(a[i-,j],a[i,j-]));
                 writeln(a[n,m]);
                 dec(l);
            end;
 end.