Delphi-PRAXiS - Einzelnen Beitrag anzeigen

**himitsu**

Zitat von WIng2005:

function Sqrt(X: Extended): Extended;

sqrt = square root = Quadratwurzel = zweite Wurzel

wenn es nur um ganze Zahlen geht, dann:

Delphi-Quellcode:

			Var i: TBigInt;

i := {zahl};

i.Radic(3);

S := IntToStr(i);

und solange ich die Fließkommazahlen nicht fertig hab ... für 2 Nachkommastellen:

Delphi-Quellcode:

			i := {zahl} * 100*100*100;

i.Radic(3);

S := FloatToStr(i / 100);