Help: Funcion Cos() me arroja un valor erroneo

[[coso]]

eso si, para pasar los grados a radianes, debes hacerlo dentro del parentesis, no fuera:

Código Delphi [-]
coseno = cos(k * 180 / M_PI)

y , esto anterior, seria suponer que k esta en radianes y cos() necesita grados, cuando el argumento de la funcion cos() se lo supone en radianes

vamos, que deberas hacer algo asi

Código Delphi [-]
k := GradosARadianes(grad);    { grad * pi / 180 }
coseno := cos(k);