EULANDA® ERP System Head Start thru Technology

Cotan (Pascal-Script)

Back | Level back

Beschreibung

Cotan berechnet den Cotangens eines Winkels.

Syntax

function Cotan(X: Extended): Extended;

Argumente

Mit Cotan können Sie den Cotangens von X ermitteln. Der Cotangens wird mit folgender Formel berechnet:

1 / Tan(X)

Rufen Sie Cotan nicht mit X = 0 auf, da dies einen Laufzeitfehler erzeugt.

Beispiel

var
  S : String;
  e : Extended;
begin
  e:=Cotan(45);
  S:=FloatToStr(e);
  ShowMessage(S);
end;

Regeln zum Nachvollziehen des Scripts finden Sie hier.

Der Variablen e vom Typ Extended wird der Cotan von 45 zugewiesen. Anschließend wird e über die Funktion FloatToStr in den String S umgewandet. 

ShowMessage zeigt: 0,617369623783555

©Eulanda Software GmbH Made in Germany, 1989-2010. All rights reserved.