Para pasar un entero a un real, sólo tienes que multiplicarlo por 1.0:
De todas maneras, creo que el error lo tienes en que estás usando el cos y el sin con grados sexagesimales, pero en delphi el cos y el sin funcionan con radianes. Así que tendrás que hacer algo así:
Código Delphi
[-]
ct := cos(2.0 * PI * g / 360.0);