国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 學院 > 開發設計 > 正文

P1086 花生采摘

2019-11-14 12:36:00
字體:
來源:轉載
供稿:網友

題目描述

在一塊矩形的花生田中,找到一株最多的花生,再找出剩下的花生中最多的一顆,依此類推,路距離田地距離為1。

樣例輸入

6 7 210 0 0 0 0 0 00 0 0 0 13 0 00 0 0 0 0 0 70 12 0 0 0 0 00 0 0 9 0 0 00 0 0 0 0 0 0

樣例輸出

37

思路

O(nm)先找到最多的一株花生,如果時間夠回到起點,就再找到剩下的最多的花生,從一株花生到另一株花生花費的時間是abs(x1-x)+abs(y1-y)+1。var t,m,n,k,s,i,j,x1,y1,x,y,ans:longint; a:array[1..100,1..100] of longint;begin readln(n,m,k); for i:=1 to n do for j:=1 to m do begin read(a[i,j]); if a[i,j]>s then begin s:=a[i,j];x:=i;y:=j;end; end; k:=k-x-2; while k-x+1>=0 do begin a[x,y]:=0;ans:=ans+s; s:=0; for i:=1 to n do for j:=1 to m do if a[i,j]>s then begin s:=a[i,j];x1:=i;y1:=j;end; k:=k-1-abs(x-x1)-abs(y-y1); x:=x1; y:=y1; end; writeln(ans);end.
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 阿图什市| 珠海市| 西盟| 青田县| 乌审旗| 景谷| 赣榆县| 屯门区| 建平县| 茂名市| 威远县| 大关县| 紫云| 岳普湖县| 陈巴尔虎旗| 长子县| 永昌县| 万山特区| 沅陵县| 翼城县| 波密县| 临江市| 日土县| 大港区| 平阴县| 和平县| 丹棱县| 铜梁县| 成都市| 洞头县| 兰考县| 霍山县| 乐都县| 雷波县| 石狮市| 南阳市| 巫溪县| 中方县| 宝清县| 宕昌县| 屏东市|