Помогите девушке

← →
Mashulia © (2006-05-14 22:00) [0]

у
|
/| 2
D1 /..|
/....| 3
--------/---|0----/-------х
-3 |... /
|../ D2
|/
с помощью IF надо решить задачу: определить, принадлежит ли точка Р с координатами (х.у) одной из заштрихованных областей D1 и D2, не включая их границ.
Пожалуста помогите!

← →
Mashulia © (2006-05-14 22:01) [1]

по оси у внизу -2

← →
Kolan © (2006-05-14 22:11) [2]

http://www.gamedev.ru/forum/?action=showtopic&group=0&topic=10350

http://www.rsdn.ru/Forum/?mid=99916

← →
Mashulia © (2006-05-14 22:17) [3]

Kolan, я девушка и тем более блондинка, поэтому не поняла в этих ссылках, напиши тут

← →
Kolan © (2006-05-14 22:42) [4]

Login: Mashulia Реальное имя: Masha Пол: Мужской Образование: высшее Увлечения / хобби Интересное о себе
Да ладно тебе, разберешь как - нибудь... Блин чуть не повелся :)

← →
Mashulia © (2006-05-14 22:48) [5]

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

← →
Rial © (2006-05-14 22:50) [6]

Имеем:
1. P(X,Y).
2. Yd1=3/2*X+2.
3. Yd2=3/2*X-2.

Тогда получаем 2 системы:
1) X<0, 2) X<0,
3/2*X+2>Y, 3/2*X-2<Y,
Y>0, Y<0,

Получаем функцию:

function Content(Const X,Y:Extended):Boolean; begin Result:=(X<0)and(Y>0)and(X*3/2+2>Y)or (X>0)and(Y<0)and(X*3/2-2<Y); end;

← →
Rial © (2006-05-14 22:54) [7]

Ой, слепота замучила ...
Замени везде 3/2 на 2/3.
Сори.

← →
Mashulia © (2006-05-14 22:55) [8]

Спасибо Риал, но у меня надо именно с помощью IF

← →
Kolan © (2006-05-14 23:01) [9]

Пользуя ф-цию
Rial © (14.05.06 22:50) [6]
if (X<0)and(Y>0)and(X*3/2+2>Y)or
(X>0)and(Y<0)and(X*3/2-2<Y)
then
ShowMessage("Внутри.");
else
ShowMessage("Снаружи.");

← →
Kolan © (2006-05-14 23:01) [10]

Пользуя ф-цию
Rial © (14.05.06 22:50) [6]
if (X<0)and(Y>0)and(X*3/2+2>Y)or (X>0)and(Y<0)and(X*3/2-2<Y) then ShowMessage("Внутри."); else ShowMessage("Снаружи.");

← →
Mashulia © (2006-05-14 23:04) [11]

Спасибочки ребята! Какие вы тут умные! А как мне анкету отредактировать?

← →
Kolan © (2006-05-14 23:10) [12]

http://www.delphimaster.ru/anketa/

← →
Mashulia © (2006-05-14 23:14) [13]

Пасиб

← →
sniknik © (2006-05-14 23:44) [14]

Удалено модератором

> Mashulia © (14.05.06 23:04) [11]
> Спасибочки ребята! Какие вы тут умные! А как мне анкету
> отредактировать?

А зачем уже что-то редактировать, когда ответ на вопрос получен?
Пусть остается так как есть на самом деле...

> Kolan, я девушка и тем более блондинка, поэтому не поняла

Прямолинейность - это хорошо. %)

Помогите девушке Найти похожие ветки