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: 3997
    User: HansBug
    Language: Pascal
    Result: Accepted
    Time:9436 ms
    Memory:8132 kb
****************************************************************/
 
var
   i,j,k,l,m,n:longint;
   a,b:array[0..1005,0..1005] of longint;
function max(x,y:longint):longint;
         begin
              if x>y then max:=x else max:=y;
         end;
begin
     readln(l);
     while l>0 do
           begin
                readln(n,m);
                for i:=1 to n do
                    begin
                         for j:=m downto 1 do read(b[i,j]);
                         readln;
                    end;
                for i:=0 to n+1 do a[i,0]:=0;
                for i:=0 to m+1 do a[0,j]:=0;
                for i:=1 to n do
                    for j:=1 to m do
                        a[i,j]:=max(a[i-1,j-1]+b[i,j],max(a[i-1,j],a[i,j-1]));
                writeln(a[n,m]);
                dec(l);
           end;
end.