Ergebnis der Suchanfrage

• Forum: Neuen Beitrag zur Code-Library hinzufügen

  Re: Quadratische Gleichungen vollständig lösen

    Delphi
    by sx2008, 24. Jul 2009
  Das war auch mein erster Gedanke. Eine saubere Funktion wird hier benötigt:
  function SolvePolynom2ndOrder(a,b,c: extended; var x1,x2:extended):Integer;
  Über die Namen der Ein- und Ausgabeparameter kann natürlich verhandelt werden.
  Die Funktion selbst liefert 0=keine Lösung, 1=Doppelte Nullstelle, 2=x1 und x2 enthalten die Nullstellen.
  Und ich bin mit Englisch schon sehr verseucht; man darf...