IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

 
 Ответить  Открыть новую тему 
> Геометрический расчет с координатами, Need help!
igoryan
сообщение 21.12.2005 10:03
Сообщение #1





Группа: Пользователи
Сообщений: 3
Пол: Мужской
Реальное имя: Игорь

Репутация: -  0  +


Всем привет! Подскажите, как решить, или киньте ссылку...
Условия задачи следующие: дан треугольник с координатами вершин (пусть будут (x1,y1),(x2,y2),(x3,y3)). Необходимо определить, находится ли точка с координатами (х,у) в области, ограниченной этим треугольником, т.е. точка внутри или вне треугольника?
Код на Паскале написать смогу написать сам, необходим просто сам алгоритм решения. Буду очень благодарен откликнувшимся!
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
volvo
сообщение 21.12.2005 10:55
Сообщение #2


Гость






Ссылка на поиск по форуму - у меня в подписи... Будь добр сам приложить хоть какие-то усилия...
 К началу страницы 
+ Ответить 
Malice
сообщение 21.12.2005 11:08
Сообщение #3


Профи
****

Группа: Пользователи
Сообщений: 705
Пол: Мужской

Репутация: -  20  +


Делай так:


if (((y-y1)*(x2-x1)-(x-x1)*(y2-y1))<0) and
(((y-y2)*(x3-x2)-(x-x2)*(y3-y2))<0) and
(((y-y3)*(x1-x3)-(x-x3)*(y1-y3))<0) then
 Внутри
 else
 Снаружи или на линии.

 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
volvo
сообщение 21.12.2005 11:11
Сообщение #4


Гость






Malice, а ты у нас постоянно будешь дублировать решения? mad.gif Я же сказал, задача решалась, и есть даже не один вариант решения. Пусть ищет...
 К началу страницы 
+ Ответить 
igoryan
сообщение 21.12.2005 11:45
Сообщение #5





Группа: Пользователи
Сообщений: 3
Пол: Мужской
Реальное имя: Игорь

Репутация: -  0  +


malice, огромное спасибо за помощь! volvo а ты действительно суров! Просто у меня не было времени ковыряться долго с этой бедой, т.к. никакой выгоды от этого я не получу. Сейчас просто у моей молодой супруги завал на учебе, я ей помогаю с pascal. Сам программист, только вот все эти формулы геометрические и т.д. и т.п. подзабыл, т.к. универ закончил давно. А поднимать старые учебники - занятие небыстрое... Нельзя так относиться к людям, volvo mad.gif . Надо быть добрым человеком, как я smile.gif - всегда всем помогаю не извлекая из этого выгоды в ущерб своему времени и здоровью. malice, тебе огромный respect! good.gif Чем отблагодарить не знаю, только вот могу выложить архив из недавних 20 задач из лаб. работ моей жены с качественным решением. Еще раз спасибо!
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
igoryan
сообщение 21.12.2005 13:52
Сообщение #6





Группа: Пользователи
Сообщений: 3
Пол: Мужской
Реальное имя: Игорь

Репутация: -  0  +


Я тут числовые данные примера подставил - не то! Неправильно считает... dry.gif

Ну, и как после этого относиться к людям? Теперь ты меня понял?

Сообщение отредактировано: volvo - 21.12.2005 13:58
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
Malice
сообщение 21.12.2005 22:39
Сообщение #7


Профи
****

Группа: Пользователи
Сообщений: 705
Пол: Мужской

Репутация: -  20  +


Цитата(volvo @ 21.12.2005 13:11) *

Malice, а ты у нас постоянно будешь дублировать решения? mad.gif Я же сказал, задача решалась, и есть даже не один вариант решения. Пусть ищет...

Когда я отвечал - твоего ответа не видел еще(страничка была раньше открыта). И если я отвечаю, то отвечаю сам, а не ищу поиском.

2 igoryan Я свое решение проверил, разбирайся. А архив мне не надо, я не учусь, поэтому он мне без надобности smile.gif
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

- Текстовая версия 18.07.2025 11:12
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"