|
|
Postada em 21/07/2006 15:42 hs
Olá pessoal, sei que está publicado na parte de dicas de operações matemáticas, mas mesmo assim, está dando erro. Preciso calcular um Arco Coseno de um número, mas as dicas que estão disponíveis não estou conseguindo fazer funcionar. Será que existe um caminho mais fácil? Por exemplo: para calcular o coseno de um número é só digitar cos(x) para calcular o seno de um número é só digitar sin(x) Alguém saberia como poderia proceder? Desde já, Muito Obrigado.
Engº Luiz Fernando
MSN: luferazan@hotmail.com
SKYPE: luferazan
|
|
|
|
|
|
|
|
Postada em 21/07/2006 16:53 hs
mas qual é o erro colega? msgbox sin(1.25) 'resultado = 0,9489... |
|
TÓPICO EDITADO
|
|
|
|
Jose.Niz
|
CURITIBA
PR - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 21/07/2006 20:53 hs
Você está passando o valor de X nas funções trigonométricas em radianos?
|
|
|
|
Sandro
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 21/07/2006 23:05 hs
Olá, Exatamente o que o amigo Jose falou. Se você estiver pensando em termos de graus, está errado. Todas as funções trigonométricas do VB e suas derivada trabalham com Radianos. Para converter, basta multiplicar o angulo em graus por pi e dividir por 180: Const PI = 3.141592653589 Radianos = Graus * (PI/180) Se tentar enviar o ângulo em graus, com certeza dará errado. um abraço, Sandro. |
|
|
|
Sérgio A Boggio
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 27/12/2008 12:29 hs
Resolução para a falta de arco-seno e arco-coseno em Qbasic utilizando ATN que é o arco-tangente existente no Qbasic
Seja X o ângulo em radianos que você deseja determinar do qual você conhece N
COS ( X ) = N
Lembrando da propriedade
SIN ( X ) ^ 2 + COS ( X ) ^ 2 = 1
Teremos:
X = ATN ( SQR ( 1 – N ^ 2 ) / N ) para X em radianos
X = 180 * ATN ( SQR ( 1 – N ^ 2 ) / N ) / 3.141592 para X em graus
|
|
|
|
Treze
|
SÃO VICENTE
SP - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 28/12/2008 11:01 hs
Não sei se é por coincidencia, ou tenha algo haver, mas em oputro forum surgio a mesma duvida e foi exclarecida da seguinte maneira.
Primeiro o angulo retornado pelo VB não é em graus e sim em radianos então qual é a formula correta.
seria esta
Angulo = PI * (Valor_do_angulo)/180
então pode tentar o seguinte
Dim angulo As Double
Const Pi = 3.14159265358979
angulo = Pi * (1.25) / 180 ' supondo que o angulo é de 1.25, retornará o valor em graus
MsgBox angulo
para saber o COSSENO
Cos(angulo)
|
|
|
|
