Принадлежность плоскасти

[dark_sergey]

Помогите решить задачку в паскале плис..
Даны действительные числа х и у.
Определить - принадлежит ли точка С с координатами (х,у) заштрихованное части плоскасти.
(На рисунке ромб, надо определить принажлежит ли точка С с координатами (х,у) этому ромбу)
.................|y
.................| 1
................/|\
.............../.|.\
............../..|..\
.-0.5___ /__|__\_0.5_____x
............\....|.../
..............\..|../
...............\.|./
................\|/
................ | -1

[p51x]

если ((икс больше или равен -0.5) и (икс меньше или равен 0.5) и (игрек больше или равен -1) и (игрек меньше или равен 1)), то принадлежит

[dark_sergey]

Сообщение от p51x

если ((икс больше или равен -0.5) и (икс меньше или равен 0.5) и (игрек больше или равен -1) и (игрек меньше или равен 1)), то принадлежит

если ввести координаты (0.4 , 0.8) то точка С будет пренадлежать плоскасти а это - не верно

[p51x]

я не решал за вас задачу, я указывал путь...

еще подсказка:
если ((модуль икс меньше или равен 0.5) и (модуль игрека меньше, чем игрек, удовлетворяющий уравнению прямой)),то принадлежит...

[dark_sergey]

Сообщение от p51x

я не решал за вас задачу, я указывал путь...

еще подсказка:
если ((модуль икс меньше или равен 0.5) и (модуль игрека меньше, чем игрек, удовлетворяющий уравнению прямой)),то принадлежит...

как это в виде кода написать ?

uses crt;
var x,y,c:real;
begin
   clrscr;
   write('x=');
   readln(x);
   write('y=');
   readln(y);   
   if ((abs(x)<=0.5) and (abs(y)<=1)) then
   writeln('npeHaglejut')
   else
   writeln('He npeHaglejt');
   readln;
end.

вот что я написал... токо этот код подходит когда у нас прямоугольник а мне надо ромб, а как это сделать для ромба я незнаю (

[D@rkD@iver]

составляй уравнения прямых на плоскости
точка должна удволитворять 4 неравенствам

[p51x]

2 D@rkD@iver
С модулями хватит одного...

2 dark_sergey
Начните с составления уравнения прямой, проходящей через (0; 1), (0.5; 0)

[D@rkD@iver]

P51x необходимо чтоб точка удволитворяла 4 неравествам, основанным на уравнениях прямых

[p51x]

зачем? неужели не видно симметрии??

[dark_sergey]

всем спасибо, я понял что и как, вроде все работает.