首页 > 学院 > 开发设计 > 正文

最佳游览路线-SSL 1210

2019-11-06 07:49:44
字体:
来源:转载
供稿:网友
Description  某旅游区的街道成网格状(见图),其中东西向的街道都是旅游街,南北向的街道都是林荫道。由于游客众多,旅游街被规定为单行道。游客在旅游街上只能从西向东走,在林荫道上既可以由南向北走,也可以从北向南走。阿隆想到这个旅游区游玩。他的好友阿福给了他一些建议,用分值表示所有旅游街相邻两个路口之间的道路值得浏览得程度,分值从-100到100的整数,所有林荫道不打分。所有分值不可能全是负值。   例如下图是被打过分的某旅游区的街道图:   阿隆可以从任一路口开始浏览,在任一路口结束浏览。请你写一个程序,帮助阿隆寻找一条最佳的浏览路线,使得这条路线的所有分值总和最大。    Input  第一行是两个整数M和N,之间用一个空格符隔开,M表示有多少条旅游街(1≤M≤100),N表示有多少条林荫道(1≤N≤20000)。接下里的M行依次给出了由北向南每条旅游街的分值信息。每行有N-1个整数,依次表示了自西向东旅游街每一小段的分值。同一行相邻两个数之间用一个空格隔开。Output  只有一行,是一个整数,表示你的程序找到的最佳浏览路线的总分值。Sample Input3 650 –47 –36 –30 –2317 –19 34 –13 –8-42 –3 43 34 -45Sample Output84题解:这道题可以用枚举的方法,读入时判断,最后输出最大值。var a:array[1..25000] of longint; i,j,k,s,n,m,max:longint;begin readln(m,n); for i:=1 to n-1 do read(a[i]); for i:=2 to m do for j:=1 to n-1 do begin read(k); if k>a[j] then a[j]:=k; end; max:=-maxlongint; i:=0; repeat inc(i); if s+a[i]<0 then s:=0 else s:=s+a[i]; if s>max then max:=s; until i>n-1; writeln(max);end.
发表评论 共有条评论
用户名: 密码:
验证码: 匿名发表