NOIP2011 铺地毯ACC 程序pascal加题解
来源:互联网 发布:09184的喜欢lofter乐乎 编辑:程序博客网 时间:2024/05/16 10:19
题目描述
为了准备一个独特的颁奖典礼,组织者在会场的一片矩形区域(可看做是平面直角坐标系的第一象限)铺上一些矩形地毯。一共有 n 张地毯,编号从 1 到n 。现在将这些地毯按照编号从小到大的顺序平行于坐标轴先后铺设,后铺的地毯覆盖在前面已经铺好的地毯之上。
地毯铺设完成后,组织者想知道覆盖地面某个点的最上面的那张地毯的编号。注意:在矩形地毯边界和四个顶点上的点也算被地毯覆盖。
输入输出格式
输入格式:输入文件名为carpet.in 。
输入共n+2 行。
第一行,一个整数n ,表示总共有 n 张地毯。
接下来的n 行中,第 i+1 行表示编号i 的地毯的信息,包含四个正整数 a ,b ,g ,k ,每两个整数之间用一个空格隔开,分别表示铺设地毯的左下角的坐标(a ,b )以及地毯在x轴和y 轴方向的长度。
第n+2 行包含两个正整数 x 和y,表示所求的地面的点的坐标(x ,y)。
输出格式:输出文件名为carpet.out 。
输出共1 行,一个整数,表示所求的地毯的编号;若此处没有被地毯覆盖则输出-1 。
输入输出样例
输入样例#1:
31 0 2 30 2 3 32 1 3 32 2
输出样例#1:
3
输入样例#2:
31 0 2 30 2 3 32 1 3 34 5
输出样例#2:
-1
说明
【样例解释1】
如下图,1 号地毯用实线表示,2 号地毯用虚线表示,3 号用双实线表示,覆盖点(2,2)的最上面一张地毯是 3 号地毯。
【数据范围】
对于30% 的数据,有 n ≤2 ;
对于50% 的数据,0 ≤a, b, g, k≤100;
对于100%的数据,有 0 ≤n ≤10,000 ,0≤a, b, g, k ≤100,000。
noip2011提高组day1第1题
程序如下:var
i,j,k,n,m:longint;a,b,c,d:array[0..10001]of longint;
begin
readln(j);//j张地毯。
for i:=1 to j do
begin
read(a[i],b[i],c[i],d[i]);
end;
readln(n,m);//求的点。
for i:=1 to j do
begin
if (n>=a[i]) and (n<=a[i]+c[i]) and (m>=b[i]) and (m<=b[i]+d[i])//地毯有没有覆盖到这个点。
then k:=i;//有的话输出。
end;
if k=0 then write('-1') else write(k); //判断有没有地毯覆盖到,有就输出,没有就输出‘-1’。
end.
0 0
- NOIP2011 铺地毯ACC 程序pascal加题解
- 级数求和ACC程序加题解PASCAL
- 全排列acc pascal程序加题解
- NOIP2011 铺地毯 题解
- NOIP2011铺地毯题解
- NOIP 2000 单词接龙ACC pascal程序加题解。
- 铺地毯pascal程序
- NOIP2016普及组复赛第一题ACC程序加题解pascal———买铅笔
- NOIP2016普及组复赛第一题的ACC程序加题解pascal
- NOIP2011提高组day1第1题-铺地毯题解
- [NOIP2011]铺地毯
- NOIP2011 铺地毯
- 【noip2011】铺地毯
- NOIP2011铺地毯
- NOIP2011 铺地毯
- NOIP2011铺地毯
- NOIP2011铺地毯
- NOIP2011 D1T1 铺地毯
- Jmeter之Bean shell使用(一)
- Java学习笔记第十天:3_内部类
- 数据驱动编程与表驱动法(多if-else结构精简)
- Frame Up_usaco 4.4_拓扑排序
- 互联网:互联网进入下半场,这场赛怎么比?
- NOIP2011 铺地毯ACC 程序pascal加题解
- 在VsPackage中使用errorlist
- JavaScript中的数据类型
- 图
- spring及spring cloud框架主要组件介绍
- html 表单提交的几种方法
- Web基础
- 搭建一个简单的mongodb服务
- moveTaskToback退后台