hypotenuse berechnen

[tobiasw]

hallo,

ich soll ein Prog. schreiben das mit dei Hypotenuse berechnet. Eingabe Felder sind zwei Edit Felder und das sind dann die Katheten. Das ganze soll unter einer Funktion geschehen

Mein bisheriger Code sieht folgendermaßen aus:

Delphi-Quellcode:

function Phythagoras(X, Y: double): double
var hypothenuse: string;
begin
hypothenuse:=sqrt(x*x+y*y);
end;

Nur dasd ganze funzt net und ich weiß jetzt auch net mehr weiter. Ich hoffe jemand kann mir helfen wie ich das hinbekomme

Gruß