18 / 13 / 1
Регистрация: 04.07.2012
Сообщений: 523
1

Нахождение угла в прямоугольном треугольнике

11.04.2019, 20:17. Показов 1821. Ответов 9

Author24 — интернет-сервис помощи студентам
привет друзья!
если известны катет b=5 и гипотенуза с=10 то
а=b/c = 0.5 - это sin(30)
как найти сам угол в градусах т.е.
что бы а=30
чёт не соображу обратную функцию
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
11.04.2019, 20:17
Ответы с готовыми решениями:

Тангенс угла в прямоугольном треугольнике зная тангенс другого угла
Пускай имеем прямоугольный треугольник. Знаем тангенс одного из не прямых углов. Как найти тангенс...

В прямоугольном треугольнике гипотенуза
3) В прямоугольном треугольнике гипотенуза равна корень из 3, а биссектриса одного из острых углов...

Угол в прямоугольном треугольнике
Как найти третью вершину прямоугольного треугольника, если известны две другие? Т.е. известны x1,...

В прямоугольном треугольнике найдите катет
В треугольнике АВС угол С=90°, АВ=5. Когсинус внешнего угла при вершине В равен - 0,6. Навйдите АС...

9
15147 / 6420 / 1731
Регистрация: 24.09.2011
Сообщений: 9,999
11.04.2019, 20:48 2
Веди, из справки VBA - Derived Math Functions
Arcsin(X) = Atn(X / Sqr(-X * X + 1))
Угол в радианах, разумеется.
1
18 / 13 / 1
Регистрация: 04.07.2012
Сообщений: 523
11.04.2019, 20:57  [ТС] 3
Казанский, это я знаю
я имею в виду код на vb6.0
Asin не работает и что делать как вычислить?
0
15147 / 6420 / 1731
Регистрация: 24.09.2011
Сообщений: 9,999
11.04.2019, 21:09 4
Лучший ответ Сообщение было отмечено Веди как решение

Решение

Веди, вот же формула для получения арксинуса с помощью арктангенса. Atn-то работает! Вот проба этой формулы в Immediate
Код
x=.5:?Atn(X / Sqr(-X * X + 1))*180/3.1416
 29,9999298471141
1
18 / 13 / 1
Регистрация: 04.07.2012
Сообщений: 523
15.04.2019, 03:44  [ТС] 5
Казанский, решает нормально но
не для всех углов. если гипотенуза лежит на оси
то получается деление на 0 а мне нужны все решения
и получается мне нужна функция asin а её нет в vb6
0
15147 / 6420 / 1731
Регистрация: 24.09.2011
Сообщений: 9,999
15.04.2019, 08:57 6
Цитата Сообщение от Веди Посмотреть сообщение
если гипотенуза лежит на оси
то получается деление на 0
Значит, неправильно составлена программа. Не путайте длины сторон треугольника и координаты его вершин.
Эту формулу, разумеется, нельзя использовать при х=1 или х=-1. Но и в треугольнике отношение катета и гипотенузы не может быть равно 1. Перед вычислением угла программа должна проверить, что заданный треугольник невырожденный, т.е. что длины всех трех сторон не равны 0.
0
18 / 13 / 1
Регистрация: 04.07.2012
Сообщений: 523
15.04.2019, 09:21  [ТС] 7
Казанский, "программа должна проверить"
просто я думал обойтись без проверок видно не судьба
0
Модератор
Эксперт функциональных языков программированияЭксперт Python
36858 / 20415 / 4237
Регистрация: 12.02.2012
Сообщений: 33,779
Записей в блоге: 13
15.04.2019, 09:56 8
Цитата Сообщение от Веди Посмотреть сообщение
просто я думал обойтись без проверок
- очень позитивный настрой для программиста
0
18 / 13 / 1
Регистрация: 04.07.2012
Сообщений: 523
15.04.2019, 18:52  [ТС] 9
Catstail, мозг сломал но не придумал
пришлось делать свою atan
Visual Basic
1
2
3
4
5
6
7
Function aTan(x As Long, y As Long) As Double
  If x > 0 And y <= 0 Then aTan = -Atn(y / x) * 180 / PI
  If x > 0 And y > 0 Then aTan = 360 - Atn(y / x) * 180 / PI
  If x < 0 Then aTan = 180 - Atn(y / x) * 180 / PI
  If x = 0 And y < 0 Then aTan = 90
  If x = 0 And y > 0 Then aTan = 270
End Function
вроде всё фунтициклирует правильно
но всё же думаю можно проще сделать
как пёс всё понимаю а сказать не могу
1
15147 / 6420 / 1731
Регистрация: 24.09.2011
Сообщений: 9,999
15.04.2019, 20:48 10
Веди, да, примерно так и делают: https://stackoverflow.com/ques... 2-function
еще https://www.google.com/search?q=atan2+vb6
0
15.04.2019, 20:48
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
15.04.2019, 20:48
Помогаю со студенческими работами здесь

В прямоугольном треугольнике доказать что h=r1+r2+r3
У кого какие идеи по поводу задачи. Из вершины прямого угла С прямоугольного треугольника АВС...

Найти отношение отрезков в прямоугольном треугольнике.
В прямоугольном треугольнике АВС с гипотенузой АВ проведена медиана СМ и высота СН, причем точка Н...

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

Альфа и бетта углы в прямоугольном треугольнике
procedure TForm1.Button1Click(Sender: TObject); var betta,alfa,c,a,b,S:real; begin ...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru