用pascal键盘输入x和y,若点在阴影内输出true,否则输出false

来源:百度知道 编辑:UC知道 时间:2024/06/30 01:36:25
急用

题目不够清晰,只能我自己假设一点条件了。
假设:阴影部分是一个矩形,且给出了该矩形左上角和右下角的坐标(x1,y1)、(x2,y2) ,而且最左上角的坐标为(0,0)

var x,y,x1,y1,x2,y2:integer;
begin
readln(x,y);
readln(x1,y1,x2,y2);{这句话根据情况来定,如果已知可改成直接赋值}
if (x>=x1) and (x<=x2) and (y>=y1) and (y<=y2) then
writeln('true') else writeln('false');
end.
判断用的四个条件的<、>根据实际情况可以更改。只要你简单地画个图模拟一下写出坐标就比较容易写出程序了。

能不能把题目说得再清楚些?