Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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

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

Megabyte (2006-05-15 11:51:00) [1]

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

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

SergP (2006-05-15 09:39:00) [2]

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

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

Gydvin (2006-05-15 09:03:00) [3]
Удалено модератором

Leonid Troyanovsky (2006-05-15 00:58:00) [4]
Удалено модератором

sniknik (2006-05-15 00:47:00) [5]
Удалено модератором

Leonid Troyanovsky (2006-05-15 00:15:00) [6]
Удалено модератором

sniknik (2006-05-14 23:44:00) [7]
Удалено модератором

Mashulia (2006-05-14 23:14:00) [8]
Пасиб

Kolan (2006-05-14 23:10:00) [9]
http://www.delphimaster.ru/anketa/

Mashulia (2006-05-14 23:04:00) [10]
Спасибочки ребята! Какие вы тут умные! А как мне анкету отредактировать?

Kolan (2006-05-14 23:01:00) [11]
Пользуя ф-цию
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:00) [12]
Пользуя ф-цию
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 22:55:00) [13]
Спасибо Риал, но у меня надо именно с помощью IF

Rial (2006-05-14 22:54:00) [14]
Ой, слепота замучила ...
Замени везде 3/2 на 2/3.
Сори.

Rial (2006-05-14 22:50:00) [15]
Имеем:
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;

Mashulia (2006-05-14 22:48:00) [16]
да просто я анкету не всю смотрела, и так получилось. ну и не помогай (((

Kolan (2006-05-14 22:42:00) [17]
Login: Mashulia Реальное имя: Masha Пол: Мужской Образование: высшее Увлечения / хобби Интересное о себе
Да ладно тебе, разберешь как - нибудь... Блин чуть не повелся :)

Mashulia (2006-05-14 22:17:00) [18]
Kolan, я девушка и тем более блондинка, поэтому не поняла в этих ссылках, напиши тут

Kolan (2006-05-14 22:11:00) [19]
http://www.gamedev.ru/forum/?action=showtopic&group=0&topic=10350

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

Mashulia (2006-05-14 22:01:00) [20]
по оси у внизу -2

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »