社区讨论

哪错了？？？？

nnoipoyjh
P1003[NOIP 2011 提高组] 铺地毯参与者 5已保存回复 4

讨论操作

快速查看讨论及其快照的属性，并进行相关操作。

当前回复
4 条
当前快照
1 份
快照标识符
@mi4g9pgm
此快照首次捕获于
2025/11/18 18:48
4 个月前
此快照最后确认于
2025/11/18 18:48
4 个月前
查看原帖
CPP
var n,q,p,i,j:longint;
    a:array[1..10000,1..4] of integer;
    x:array[1..10000,1..2] of longint;
    y:array[1..10000,1..2] of longint;
begin
  read(n);
  if n=0 then begin writeln(-1);  halt; end;
  for i:=1 to n do
    for j:=1 to 4 do read(a[i,j]);
    read(q,p);
  for i:=1 to n do
  begin
    x[i,2]:=a[i,1]+a[i,3];
    x[i,1]:=a[i,1];
    y[i,1]:=a[i,2];
    y[i,2]:=a[i,2]+a[i,4];
  end;
  for i:=n downto 1 do
  if (q>=x[i,1]) and (q<=x[i,2]) and (p>=y[i,1]) and (p<=y[i,2]) then
  begin
    writeln(i);
    halt;
  end;
  writeln(-1);
end.

回复

共 4 条回复，欢迎继续交流。

正在加载回复...