花生采摘
来源:互联网 发布:淘宝玻璃砖 编辑:程序博客网 时间:2024/04/26 23:23
题目描述
鲁宾逊先生有一只宠物猴,名叫多多。这天,他们两个正沿着乡间小路散步,突然发现路边的告示牌上贴着一张小小的纸条:“欢迎免费品尝我种的花生!――熊字”。
鲁宾逊先生和多多都很开心,因为花生正是他们的最爱。在告示牌背后,路边真的有一块花生田,花生植株整齐地排列成矩形网格(如图1)。有经验的多多一眼就能看出,每棵花生植株下的花生有多少。为了训练多多的算术,鲁宾逊先生说:“你先找出花生最多的植株,去采摘它的花生;然后再找出剩下的植株里花生最多的,去采摘它的花生;依此类推,不过你一定要在我限定的时间内回到路边。”
我们假定多多在每个单位时间内,可以做下列四件事情中的一件:
1) 从路边跳到最靠近路边(即第一行)的某棵花生植株;
2) 从一棵植株跳到前后左右与之相邻的另一棵植株;
3) 采摘一棵植株下的花生;
4) 从最靠近路边(即第一行)的某棵花生植株跳回路边。
现在给定一块花生田的大小和花生的分布,请问在限定时间内,多多最多可以采到多少个花生?注意可能只有部分植株下面长有花生,假设这些植株下的花生个数各不相同。
例如在图2所示的花生田里,只有位于(2, 5), (3, 7), (4, 2), (5, 4)的植株下长有花生,个数分别为13, 7, 15, 9。沿着图示的路线,多多在21个单位时间内,最多可以采到37个花生。
输入输出格式
输入格式:
输入文件peanuts.in的第一行包括三个整数,M, N和K,用空格隔开;表示花生田的大小为M * N(1 <= M, N <= 20),多多采花生的限定时间为K(0 <= K <= 1000)个单位时间。接下来的M行,每行包括N个非负整数,也用空格隔开;第i + 1行的第j个整数Pij(0 <= Pij <= 500)表示花生田里植株(i, j)下花生的数目,0表示该植株下没有花生。
输出格式:
输出文件peanuts.out包括一行,这一行只包含一个整数,即在限定时间内,多多最多可以采到花生的个数。
输入输出样例
输入样例#1:
6 7 21
0 0 0 0 0 0 0
0 0 0 0 13 0 0
0 0 0 0 0 0 7
0 15 0 0 0 0 0
0 0 0 9 0 0 0
0 0 0 0 0 0 0
输出样例#1:
37
输入样例#2:
6 7 20
0 0 0 0 0 0 0
0 0 0 0 13 0 0
0 0 0 0 0 0 7
0 15 0 0 0 0 0
0 0 0 9 0 0 0
0 0 0 0 0 0 0
输出样例#2:
28
说明
程序中b储存花生数,c储存纵坐标,d储存横坐标,要用到快排。
var b,c,d:array[1..10000] of longint; a,m,n,k,i,j,ans,t:longint;procedure qsort(l,r:longint);var i,j,mid:longint;begin i:=l; j:=r; mid:=b[(l+r) div 2]; repeat while b[i]>mid do inc(i); while b[j]<mid do dec(j); if i<=j then begin a:=b[i];b[i]:=b[j];b[j]:=a; a:=c[i];c[i]:=c[j];c[j]:=a; a:=d[i];d[i]:=d[j];d[j]:=a; inc(i);dec(j); end; until i>j; if i<r then qsort(i,r); if j>l then qsort(l,j);end;begin readln(m,n,k); for i:=1 to m do for j:=1 to n do begin read(a); if a<>0 then begin inc(t); b[t]:=a; c[t]:=i; d[t]:=j; end; end; qsort(1,t); k:=k-c[1]-1; for i:=1 to t do if k-c[i]>=0 then begin inc(ans,b[i]); k:=k-abs(d[i]-d[i+1])-abs(c[i]-c[i+1])-1; end else break; writeln(ans);end.
- 花生采摘
- 花生采摘
- 花生采摘
- 花生采摘
- 花生采摘
- 花生采摘
- 花生采摘
- 花生采摘
- 花生采摘
- 花生采摘
- 花生采摘
- 花生采摘
- Noip2004P2 花生采摘
- [洛谷1086]花生采摘
- 洛谷 P1086 花生采摘
- 花生采摘-洛谷 1086
- P1086 花生采摘
- codeves天梯 花生采摘
- Linux应用领域
- 解决在vmware中安装centos7时遇到的无法连接网络问题
- UITableView莫名其妙多了一块空白区域
- PAT甲级 1005.Spell It Right(20) 题目翻译与答案
- Java程序员谈一谈-----java程序员成长之路
- 花生采摘
- Set接口
- C++;MFC点击弹出自定义对话框
- Keil&IAR生成库及库的说明与使用
- 常用PHP函数系列一:正则验证中文姓名
- bzoj1015 [JSOI2008]星球大战starwar
- DVWA系列(四)----Command Injection (命令行注入)
- C++输入输出
- 二分插入