Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
Владимир_ВМ
128 / 109 / 103
Регистрация: 16.05.2011
Сообщений: 340
1

Найти угол между отрезком АВ и осью ОХ

12.02.2012, 19:59. Просмотров 991. Ответов 7
Метки нет (Все метки)

Даны две точки А(Х1,У1), В(Х2,У2). Найти угол между отрезком АВ и осью ОХ.
Для начало я сделал a1:=abs(X1-X2), a2:=abs(Y1-Y2). Далее можно найти угол через арктангенс. Но как? Пробовал подобие для sin(pi/180*a). Безуспешно. Может я слишком зациклелся на этом арктангенсе.
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
12.02.2012, 19:59
Ответы с готовыми решениями:

Найти и напечатать координаты точки, для которой угол между осью абсцисс и лучом — минимальный
Три точки заданы своими координатами X(x1, x2), Y(y1, y2) и Z(z1, z2). Найти и...

найти угол между векторами
Объясните как написать программу... Задача Заданы два вектора с координатами...

Найти угол между прямыми
Задача состоит в том,что надо найти угол при котором нижний шар собьет верхний....

Найти угол между векторами
Даны координаты двух n-мерных векторов. A(a; a; ...; a), B(b; b; ...; b). Найти...

Найти площадь треуголльника,две стороны которого равны a и b , а угол между ними y.
плизз помогите люди!!!!!! 1задача. найти площадь треуголльника,две стороны...

7
Puporev
Модератор
55010 / 42306 / 29211
Регистрация: 18.05.2008
Сообщений: 99,969
12.02.2012, 20:49 2
Цитата Сообщение от Владимир_ВМ Посмотреть сообщение
Найти угол между отрезком АВ и осью ОХ.
Угол между положительным направлением оси и вектором АВ или просто меньший угол(угол наклона)?

Добавлено через 2 минуты
Цитата Сообщение от Владимир_ВМ Посмотреть сообщение
Далее можно найти угол через арктангенс. Но как?
Pascal
1
2
if a1=0 then u:=90
else u:=arctan((a2/a1))*180/pi;
это угол наклона, до 90 градусов
1
Владимир_ВМ
128 / 109 / 103
Регистрация: 16.05.2011
Сообщений: 340
12.02.2012, 22:37  [ТС] 3
Большое спасибо. Вопрос. А почему 180/pi за скобками?
0
Ev[G]eN
iOS/Android Developer
Эксперт С++
5118 / 1556 / 950
Регистрация: 23.01.2011
Сообщений: 3,185
Завершенные тесты: 1
12.02.2012, 22:40 4
Цитата Сообщение от Puporev Посмотреть сообщение
Pascal
1
u:=arctan((a2/a1))*180/pi;
arctan((a2/a1)) - здесь вычисляется значение арктангенса, а затем полученное значение умножается на 180/pi
0
Владимир_ВМ
128 / 109 / 103
Регистрация: 16.05.2011
Сообщений: 340
12.02.2012, 22:53  [ТС] 5
Цитата Сообщение от Ev[G]eN Посмотреть сообщение
arctan((a2/a1)) - здесь вычисляется значение арктангенса, а затем полученное значение умножается на 180/pi
Это понятно что домнажается. А вот почему не в скобках, а за ними. К примеру sin(pi/180*a1) в скобках.
0
thyrex
Вирусоборец
7320 / 4876 / 760
Регистрация: 06.09.2009
Сообщений: 19,523
12.02.2012, 22:58 6
Цитата Сообщение от Владимир_ВМ Посмотреть сообщение
sin(pi/180*a1)
Функция sin в качестве параметра использует угол в радианах. Перевод из градусной меры в радианную в скобках и реализован

Аналогично, в Вашей программе осуществляется обратный процесс: перевод из радианной меры, которая получается после вычисления arctan, в градусную
1
Ev[G]eN
iOS/Android Developer
Эксперт С++
5118 / 1556 / 950
Регистрация: 23.01.2011
Сообщений: 3,185
Завершенные тесты: 1
12.02.2012, 22:59 7
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Цитата Сообщение от Владимир_ВМ Посмотреть сообщение
sin(pi/180*a1)
здесь вычисляется функция синуса из всего выражения pi/180*a1
тоесть в результате pi/180*a1 будет находится синус
здесь же
arctan((a2/a1))*180/pi
вычисляется функция арктангенсы из выражения a2/a1, а затем, полученное выражение домножается на pi/180
0
Владимир_ВМ
128 / 109 / 103
Регистрация: 16.05.2011
Сообщений: 340
12.02.2012, 23:06  [ТС] 8
Спасибо. Я на досуге поразмышляю над этим.
0
12.02.2012, 23:06
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
12.02.2012, 23:06

Выдать на печать координаты точек по возрастанию угла между осью абсцисс и лучом
Три точки заданы координатами в первом квадранте: (X1,X2), (Y1,Y2), (Z1,Z2)....

Угол между векторами
помогите пожалуйста,очень срочно нужно:help: Найти угол между векторами A(n) и...

Определить угол между векторами
ЗАДАЧА: Заданы два вектора с координатами (X1, Y1, Z1) и (X2, Y2, Z3)....


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
8
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru