Ich hab das bei nem Taschenrechner auch benutzt, da htte ichne Variable Trigo vom Typ REAL, die beim Wechseln des Modi belegt wurde:
Bogenmaß: Trigo:=1
Gradmaß: Trigo:=Pi/180
Rechenbeispiel:
Sinus: Ergebnis:=sin(trigo*eingabe);
Arcsin: Ergebnis:=arcsin(eingabe)/trigo
MfG Daniel