5775. 【NOIP2008模拟】农夫约的假期

Description
  在某国有一个叫农夫约的人,他养了很多羊,其中有两头名叫mm和hh,他们的歌声十分好听,被当地人称为“魔音”······
  农夫约也有自己的假期呀!他要去海边度假,然而mm和hh不能离开他。没办法,他只好把他们两个带上。
  到了海边,农夫约把他的羊放在一个(n*n)的矩阵(有n*n个方格)里。mm和hh十分好动,他们要走到m(m<=n*n)个地方,第i个地方的坐标为(x[i](行),y[i](列)),每到一个地方他们会高歌一曲,制造q[i]点魔音值,因为他们的魔音十分独特,他们的声音只能横着或竖着传播。每传播一格,魔音值会增加1。(传播的格子数取最小的)接下来农夫约要住酒店。为了方便照顾小羊们,他选的酒店的坐标要在矩阵内。但小羊们的魔音让他十分头疼。他想求出魔音值最小的地方。
他还要享受他的假期,所以他把这个任务交给你了,加油(^_^)。
 
Input
第一行输入n、m和z。
接下来m行,每行3个正整数x[i],y[i]和q[i]。
 
Output
第一行一个整数表示魔音值最小是多少。
接下来一行两个正整数zb1和zb2,表示魔音值最小的地方的坐标(如果有多个答案,输出横坐标最小的情况下,纵坐标最小的)。
 
Solutions

见代码。

 

代码

 

 1 var
 2   num,ans:int64;
 3   n,m,z:longint;
 4   x,y,xx,yy:array [0..100001] of int64;
 5 procedure init;
 6 var
 7   i,q:longint;
 8 begin
 9   readln(n,m,z);
10   ans:=0;
11   for i:=1 to m do
12     begin
13       readln(xx[i],yy[i],q);
14       ans:=ans+q;
15       inc(x[xx[i]]); inc(y[yy[i]]);
16     end;
17   for i:=2 to n do
18     begin
19       x[i]:=x[i]+x[i-1];
20       y[i]:=y[i]+y[i-1];
21     end;
22 end;
23 
24 procedure main;
25 var
26   tt,kk:int64;
27   i,qq,zz:longint;
28 begin
29   for i:=1 to n do
30     if x[i]>x[n]-x[i] then
31       begin
32         qq:=i;
33         break;
34       end;
35   for i:=1 to n do
36     if y[i]>y[n]-y[i] then
37       begin
38         zz:=i;
39         break;
40       end;
41   num:=0; tt:=0; kk:=0;
42   for i:=1 to m do
43     begin
44       num:=num+abs(xx[i]-qq)+abs(yy[i]-zz);
45       tt:=tt+abs(xx[i]-qq+1)+abs(yy[i]-zz);
46       kk:=kk+abs(xx[i]-qq)+abs(yy[i]-zz+1);
47     end;
48   while tt=num do
49     begin
50       tt:=0; dec(qq);
51       for i:=1 to m do
52         tt:=tt+abs(xx[i]-qq+1)+abs(yy[i]-zz);
53     end;
54   while kk=num do
55     begin
56       kk:=0; dec(zz);
57       for i:=1 to m do
58         kk:=kk+abs(xx[i]-qq)+abs(yy[i]-zz+1);
59     end;
60   writeln(num+ans);
61   writeln(qq,' ',zz);
62 end;
63 
64 begin
65   assign(input,'shuru.in');
66   assign(output,'shuru.out');
67   reset(input);
68   rewrite(output);
69   init;
70   main;
71   close(input);
72   close(output);
73 end.

 

 

 

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
该资源内项目源码是个人的课程设计、毕业设计,代码都测试ok,都是运行成功后才上传资源,答辩评审平均分达到96分,放心下载使用! ## 项目备注 1、该资源内项目代码都经过测试运行成功,功能ok的情况下才上传的,请放心下载使用! 2、本项目适合计算机相关专业(如计科、人工智能、通信工程、自动化、电子信息等)的在校学生、老师或者企业员工下载学习,也适合小白学习进阶,当然也可作为毕设项目、课程设计、作业、项目初期立项演示等。 3、如果基础还行,也可在此代码基础上进行修改,以实现其他功能,也可用于毕设、课设、作业等。 下载后请首先打开README.md文件(如有),仅供学习参考, 切勿用于商业用途。 该资源内项目源码是个人的课程设计,代码都测试ok,都是运行成功后才上传资源,答辩评审平均分达到96分,放心下载使用! ## 项目备注 1、该资源内项目代码都经过测试运行成功,功能ok的情况下才上传的,请放心下载使用! 2、本项目适合计算机相关专业(如计科、人工智能、通信工程、自动化、电子信息等)的在校学生、老师或者企业员工下载学习,也适合小白学习进阶,当然也可作为毕设项目、课程设计、作业、项目初期立项演示等。 3、如果基础还行,也可在此代码基础上进行修改,以实现其他功能,也可用于毕设、课设、作业等。 下载后请首先打开README.md文件(如有),仅供学习参考, 切勿用于商业用途。
NOIP(全国青少年信息学奥林匹克竞赛)是中国国内最高水平的信息学竞赛之一,是计算机领域的重要赛事。针对NOIP的模拟题,通常是为了帮助参赛者熟悉比赛形式和题型,提供足够的训练机会。 数据下载是NOIP比赛中的一个重要环节,因为参赛者需要根据提供的数据集进行程序开发和测试。数据下载一般通过网络进行,参赛者需要在指定的时间段内下载数据集到自己的计算机上。 在进行NOIP模拟题数据下载时,我们可以按照以下步骤进行操作: 1. 确认下载链接:NOIP官方会提供下载数据集的链接或者FTP地址,参赛者需要确认链接是否可用和正确。 2. 选择下载工具:根据自己的需求,参赛者可以选择合适的下载工具进行操作。常见的下载工具有浏览器内置下载工具、迅雷、IDM等,可以根据个人的习惯和需求选择合适的下载工具。 3. 打开下载工具:根据所选择的下载工具类型,打开对应的软件,进入下载界面。 4. 输入下载链接:将NOIP提供的数据集下载链接复制粘贴到下载工具的链接输入框中,点击确定或开始进行下载。 5. 等待下载完成:根据数据集的大小和网络速度不同,下载时间会有所变化。参赛者需要耐心等待下载完成,确保数据集完整地保存到自己的计算机上。 6. 验证数据完整性:下载完成后,参赛者需要验证数据集的完整性,确保所有文件都成功地保存到指定位置。可以进行文件大小的比对或者逐个文件的校验来检查数据完整性。 通过以上步骤,参赛者可以成功地进行NOIP模拟题数据的下载。在实际比赛中,一个高效的数据下载过程可以提高参赛者的准备时间和竞争力,确保能够充分利用所提供的数据集进行开发和测试。

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值