Operaciones algebraicas entre radianes y grados decimales

[[escafandra]]

Empezado por compuin

La formula es

Código Delphi [-]
SIN DA = TAN LT * TAN DECL

Deberia obtener este resultado

Código Delphi [-]
lt:=    -2.19474036998329; 
decl:= -24.7975765404927

El resultado deberia ser

Código Delphi [-]
da:= -3.06365791942224

Aqui es donde no entiendo cuando convertir a radianes, grados o decimales

Por partes:
1- Según la formula que pones DA = ARCSIN(TAN LT * TAN DECL) pero eso no lo veo en el código que debería ser algo como:

Código Delphi [-]
var
  DA, lt, decl : extended;
begin
  lt:=    -2.19474036998329;
  decl:= -24.7975765404927;

  DA:= RadToDeg(arcsin(tan(DegToRad(lt))*tan(DegToRad(decl))));
end;

Eso siempre que los datos sean grados y el resultado también.


2.- Los ángulos que das están ambos en el 4º cuadrante y su tangente será negativa para ambos. El producto de las tangentes será positivo y eso significa si, o si que es seno de DA es positivo, luego DA está en el primer o segundo cuadrante, con lo que no va a ser negativo del orden que das (-3.06365791942224).

3.- Con las conclusiones obtenidas tenemos, que la fórmula que das es incorrecta, o que el código lo es, ambas cosas o que los datos no son grados, en cuyo caso serían radianes pero considerando esto último, tampoco da -3.06365791942224.

4.- Debes revisar bien el planteamiento que das, las matemáticas no fallan y los ordenadores tampoco.


Saludos.