Dịch sốt xuất huyết (Dengue) ở người do muỗi vằn gây ra. Để phòng chống bệnh này người ta tìm cách diệt muỗi và lăng quăng (ấu trùng muỗi). Diệt lăng quăng cần phải khơi thông cống, rãnh và nước đọng để không còn môi trường phát triển cho muỗi. Để diệt muỗi người ta sử dụng một loại “bẫy muỗi”. Bẫy muỗi là một mảnh bìa chữ nhật trên mặt mảnh bìa có bôi keo dính để dính muỗi, khi muỗi đậu xuống mảnh bìa sẽ bị dính chặt vào chiếc bẫy. Nếu như may mắn chiếc bẫy sẽ dính được rất nhiều muỗi. Nhà Bờm rất nhiều muỗi, vốn lười nên Bờm nghĩ cách làm duy nhất một bẫy để dính hết muỗi. Giả sử trong hệ trục tọa độ , bạn biết được tọa độ của con muỗi sẽ đậu, bạn hãy giúp Bờm làm chiếc bẫy nhỏ nhất có các cạnh song song với các trục tọa độ để dính được con muỗi trên. Yêu cầu: Cho tọa độ của con muỗi sẽ đậu xuống chỗ tối. Hãy tìm: tọa độ góc trên cùng bên trái; tọa độ góc dưới cùng bên phải của chiếc bẫy nhỏ nhất có các cạnh song song với các trục tọa độ để dính được con muỗi trên (nếu cạnh chiếc bẫy đi qua tọa độ của con muỗi nào thì có nghĩa là con muỗi đó đậu xuống và dính vào chiếc bẫy). Dữ liệu vào: Bàn phím: Dòng : chứa số nguyên dương ; Dòng thứ trong dòng tiếp theo mỗi dòng chứa số nguyên (cách nhau dấu cách) là tọa độ con muỗi thứ sẽ đậu xuống. Kết quả: Đưa ra màn hình bốn số nguyên lần lượt là tọa độ góc trên cùng bên trái, tọa độ góc dưới cùng bên phải của chiếc bẫy tìm được (các số cách nhau dấu cách). Ví dụ: DỮ LIỆU VÀO KẾT QUẢ 4 3 6 10 1 6 4 10 2 5 6 3 1 thuật giải tìm max, min của x,y
1 câu trả lời
uses crt, math;
var m1x,m1y,m2x,m2y:int64;
i,n:longint;
x,y:longint;
begin
clrscr;
readln(n);
m1x:=-trunc(1e12);
m2x:=trunc(1e12);
m1y:=-trunc(1e12);
m2y:=trunc(1e12);
for i:=1 to n do
begin
readln(x, y);
m1x:=max(m1x, x);
m2x:=min(m2x, x);
m1y:=max(m1y, y);
m2y:=min(m2y, y);
end;
writeln(m2x,' ',m1y,' ',m1x,' ',m2y);
readln;
end.
Câu hỏi trong lớp
Xem thêm