funciones trigonometricas

[pabloloustau]

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]

http://upload.wikimedia.org/math/9/f/a/9fa8b061a4ba9582b5a791b2c82b8a0f.png

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.


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;