Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 01.02.2007, 00:33   #1
AVer
Андрей
Форумчанин
 
Аватар для AVer
 
Регистрация: 21.11.2006
Сообщений: 457
По умолчанию Угол по тангенсу

Пишу именно в разделе по делфи, так как проблема именно в этом. Мне нужно определить угол по его тангенсу. Рассуждения типа "Арктангенсом..." не предлагать. Как записать это на делфи?
ICQ: 5311314
[SIGPIC][/SIGPIC]
AVer вне форума Ответить с цитированием
Старый 01.02.2007, 07:46   #2
zetrix
Delphi/C++/C#
Участник клуба
 
Аватар для zetrix
 
Регистрация: 29.10.2006
Сообщений: 1,972
По умолчанию

хорошо, без арктангенса:

Делаем цикл, меняем от -90 до 90 градусов, увеличиваем на 0.01 и вычисляем тангенс, а потом сравниваем с нашим тангенсом, если раздница меньше допустим 0.01 то значит мы нашли этот угол
zetrix вне форума Ответить с цитированием
Старый 01.02.2007, 11:40   #3
Virtson
Владимир М.
Участник клуба
 
Аватар для Virtson
 
Регистрация: 30.10.2006
Сообщений: 1,289
Радость

Цитата:
Сообщение от AVer Посмотреть сообщение
Мне нужно определить угол по его тангенсу. Рассуждения типа "Арктангенсом..." не предлагать.
почему ?,..........
Берегите друг друга!
Virtson вне форума Ответить с цитированием
Старый 01.02.2007, 11:41   #4
AVer
Андрей
Форумчанин
 
Аватар для AVer
 
Регистрация: 21.11.2006
Сообщений: 457
По умолчанию

Не. Хотелось бы немного точнее, а то при тангенсе = 1 (угол 45) ответ получается -77.

TO Virtson

Можно и через арктангенс, только мне формула нужна. Точная.
ICQ: 5311314
[SIGPIC][/SIGPIC]
AVer вне форума Ответить с цитированием
Старый 01.02.2007, 11:44   #5
Квэнди
Старожил
 
Аватар для Квэнди
 
Регистрация: 13.12.2006
Сообщений: 3,859
По умолчанию

а модуль math не подходит ?
ArcTahn - Гиперболический арктангенс
ArcTan2 - Арктангенс с учетом квадранта (функция ArcTan, не учитывающая квадрант, находится в модуле System)
ICQ не для вопросов, а для предложений. Для вопросов используйте форум
IRC канал клуба программистов|Мои статьи
Квэнди вне форума Ответить с цитированием
Старый 01.02.2007, 11:46   #6
AVer
Андрей
Форумчанин
 
Аватар для AVer
 
Регистрация: 21.11.2006
Сообщений: 457
По умолчанию

Цитата:
Сообщение от Квэнди Посмотреть сообщение
а модуль math не подходит ?
ArcTahn - Гиперболический арктангенс
ArcTan2 - Арктангенс с учетом квадранта (функция ArcTan, не учитывающая квадрант, находится в модуле System)
Во. Я про это и говорил. Помогите мне пожалуйста формулой а не теорией! Так лучше?
ICQ: 5311314
[SIGPIC][/SIGPIC]
AVer вне форума Ответить с цитированием
Старый 01.02.2007, 12:00   #7
Virtson
Владимир М.
Участник клуба
 
Аватар для Virtson
 
Регистрация: 30.10.2006
Сообщений: 1,289
По умолчанию

да,
а то мне тоже сразу Math вспоминается
а когда-то я тоже с этим помучился,
ArcTan2 свой написал.

а еще есть бывают проблемы с углами в 3D пространстве, когда тангенсы известны ..
Берегите друг друга!
Virtson вне форума Ответить с цитированием
Старый 01.02.2007, 12:19   #8
Квэнди
Старожил
 
Аватар для Квэнди
 
Регистрация: 13.12.2006
Сообщений: 3,859
По умолчанию

http://ru.wikipedia.org/wiki/%D0%A2%...86%D0%B8%D0%B8
не то ? )
ICQ не для вопросов, а для предложений. Для вопросов используйте форум
IRC канал клуба программистов|Мои статьи
Квэнди вне форума Ответить с цитированием
Старый 01.02.2007, 12:28   #9
AVer
Андрей
Форумчанин
 
Аватар для AVer
 
Регистрация: 21.11.2006
Сообщений: 457
По умолчанию

Цитата:
Сообщение от Квэнди Посмотреть сообщение
Не-а. Не то.
ICQ: 5311314
[SIGPIC][/SIGPIC]
AVer вне форума Ответить с цитированием
Старый 01.02.2007, 12:47   #10
Virtson
Владимир М.
Участник клуба
 
Аватар для Virtson
 
Регистрация: 30.10.2006
Сообщений: 1,289
По умолчанию

"ArcTan2 calculates ArcTan(Y/X), and returns an angle in the correct quadrant. The values of X and Y must be between –2^64 and 2^64. In addition, the value of X can’t be 0. The return value will fall in the range from -Pi to Pi radians."

т.е. нужно проверять X=0
и сравнивать X<0 - тогда угол в 2 либо 3 четверти д.быть ..
в этом случае добавлеям + Pi
Берегите друг друга!
Virtson вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Узнать угол зная X и Y Dj_smart Общие вопросы Delphi 12 12.05.2009 05:09
Поворот буквы на указанный угол delphin100 Общие вопросы Delphi 1 02.06.2008 16:28
КАК поместить ИКОНКУ программы в правый нижний угол панели(там где пуск)??? micaell Общие вопросы Delphi 5 21.02.2007 19:58