Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   funciones trigonometricas (https://www.clubdelphi.com/foros/showthread.php?t=65887)

pabloloustau 20-01-2010 04:08:32

funciones trigonometricas
 
hola a todos! les hago una consulta sobre funciones trigonometricas.
no tengo problemas con los calculos de sin, cos y tan. pero si con las inversas, les doy un ejemplo.

sin x = 0.5 el resultado de esto seria x = 30.

pero si lo hago con las funciones de delphi como por ejemplo:

x := 1/sin (DegToRad(0.5));
x := cosecant(DegToRad(0.5));
x := arcsin (DegToRad(0.5));
x := arcsinb (DegToRad(0.5));
x := csc (DegToRad(0.5));

con ninguna de estas me da 30, alguien sabe como hacer para que salgan bien las inversas???

MAXIUM 20-01-2010 04:56:06



ArcSin recibe como parámetro y devuelve solo radianes, por lo que tu conversión arcsin(DegToRad(0.5)) no es correcta, por eso no te da el cálculo.

Código Delphi [-]
var
    float: single;
begin
      float:= ArcSin(0.5);
      float:= RadToDeg(float);  // Convierte a degradianes
      ShowMessage('El Seno inverso de 0.5 = '+FloatToStr(float)+'  degradianes');
end;


La franja horaria es GMT +2. Ahora son las 18:52:13.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi