Hypotenuse eines rechtwinkligen Dreiecks berechnen
Hierfür hält die Unit Math die Funktion Hypot bereit, die als Aufrufparameter die Länge der beiden Katheten erwartet:
uses Math; var hypothenuse: double; begin hypothenuse:=hypot(5, 6); //Ergebnis ca. 7,81