Du hast die Formel:
Sekante:=2*Radius*sin(winkel);
Die Sinus-Funktion erwartet aber den Winkel im Bogenmaß.
Es gibt übrigens auch die Funktionen DegToRad() und RadtoDeg() die Bogenmaß(engl.
Radian) und Grad (egl.
Degree) ineineander umrechnen
Konkret hieße der Code für die Sekante von oben dann
Sekante:=2*Radius*sin(DegToRad(winkel));