标签：style blog http color os for ar 数据 art
小渊和小轩是好朋友也是同班同学，他们在一起总有谈不完的话题。一次素质拓展活动中，班上同学安排做成一个m行n列的矩阵，而小渊和小轩被安排在矩阵对角线的两端，因此，他们就无法直接交谈了。幸运的是，他们可以通过传纸条来进行交流。纸条要经由许多同学传到对方手里，小渊坐在矩阵的左上角，坐标(1,1)，小轩坐在矩阵的右下角，坐标(m,n)。从小渊传到小轩的纸条只可以向下或者向右传递，从小轩传给小渊的纸条只可以向上或者向左传递。
在活动进行中，小渊希望给小轩传递一张纸条，同时希望小轩给他回复。班里每个同学都可以帮他们传递，但只会帮他们一次，也就是说如果此人在小渊递给小轩纸条的时候帮忙，那么在小轩递给小渊的时候就不会再帮忙。反之亦然。
还有一件事情需要注意，全班每个同学愿意帮忙的好感度有高有低（注意：小渊和小轩的好心程度没有定义，输入时用0表示），可以用一个0-100的自然数来表示，数越大表示越好心。小渊和小轩希望尽可能找好心程度高的同学来帮忙传纸条，即找到来回两条传递路径，使得这两条路径上同学的好心程度只和最大。现在，请你帮助小渊和小轩找到这样的两条路径。
输入第一行有2个用空格隔开的整数m和n，表示班里有m行n列（1<=m,n<=50）。
接下来的m行是一个m*n的矩阵，矩阵中第i行j列的整数表示坐在第i行j列的学生的好心程度。每行的n个整数之间用空格隔开。
输出共一行，包含一个整数，表示来回两条路上参与传递纸条的学生的好心程度之和的最大值。
各个测试点1s
【限制】
30%的数据满足：1<=m,n<=10
100%的数据满足：1<=m,n<=50
NOIp2008 提高组第三题
3 3 0 3 9 0 0 2 8 5 0 5 7 0
0 0
0
var a:array[0..100,0..100]of longint; f:array[0..100,0..100,0..100]of longint; n,m,i,j,k,s1,s2,x1,y1,x2,y2,max:longint; begin read(n,m); for i:=1 to n do for j:=1 to m do read(a[i,j]); f[2,1,2]:=a[2,1]+a[1,2]; for k:=2 to m+n-2 do//步数 for s1:=1 to k-1 do//1的位置 for s2:=s1+1 to k do//2的位置 begin x1:=k+2-s1; y1:=s1; x2:=k+2-s2; y2:=s2; if f[k,s1,s2]+a[x1,y1]+a[x2,y2]>f[k+1,s1,s2] then f[k+1,s1,s2]:=f[k,s1,s2]+a[x1,y1]+a[x2,y2]; x2:=x2-1; y2:=y2+1; if f[k,s1,s2]+a[x1,y1]+a[x2,y2]>f[k+1,s1,s2+1] then f[k+1,s1,s2+1]:=f[k,s1,s2]+a[x1,y1]+a[x2,y2]; x1:=x1-1; y1:=y1+1; if f[k,s1,s2]+a[x1,y1]+a[x2,y2]>f[k+1,s1+1,s2+1] then f[k+1,s1+1,s2+1]:=f[k,s1,s2]+a[x1,y1]+a[x2,y2]; x2:=x2+1; y2:=y2-1; if (x1<>x2)and (f[k,s1,s2]+a[x1,y1]+a[x2,y2]>f[k+1,s1+1,s2]) then f[k+1,s1+1,s2]:=f[k,s1,s2]+a[x1,y1]+a[x2,y2]; end; k:=m+n-2; for s1:=1 to k-1 do for s2:=s1+1 to k do if max<f[k,s1,s2] then max:=f[k,s1,s2]; writeln(max); end.
标签：style blog http color os for ar 数据 art
原文地址：http://www.cnblogs.com/zjhl2/p/3939243.html
