Скачать: CL | DM;

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

← →
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]

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

---

← →
Leonid Troyanovsky ©   (2006-05-15 00:15) [15]

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

---

← →
sniknik ©   (2006-05-15 00:47) [16]

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

---

← →
Leonid Troyanovsky ©   (2006-05-15 00:58) [17]

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

---

← →
Gydvin ©   (2006-05-15 09:03) [18]

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

---

← →
SergP ©   (2006-05-15 09:39) [19]

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


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

---

← →
Megabyte ©   (2006-05-15 11:51) [20]

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

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.49 MB
Время: 0.025 c