Thema: Delphi Wurzel aus Int64 ziehen

Einzelnen Beitrag anzeigen

Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#4

Re: Wurzel aus Int64 ziehen

  Alt 15. Jul 2004, 17:49
So geht es:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
  wurzel: LongInt;
  Radiant: Extended;
begin
  Radiant := 144;
  wurzel := Trunc(sqrt(Radiant));
  ShowMessage(IntToStr(wurzel));
end;
Warum sqrt auch einen LongInt akzeptiert, wo es doch einen Extended erwartet, kann ich dir auch nicht sagen.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat