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);
coseno := cos(k);