Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: Quadratische und Lineare Funktion

    Delphi
    by Niels, 5. Jan 2004
  Moin!
  
  Es gibt mehrere Möglichkeiten. Du kannst dir ne Funktion schreiben für die Ausgabe...das könnte so aussehen:
  
  function zahlAusgabe(zahl: Real): string;
  begin
  if zahl = abs(zahl) then
  result := '+ ' + FloatToStrF(abs(zahl),ffFixed,100,2)
  else
  result := '- ' + FloatToStrF(abs(zahl),ffFixed,100,2);
• Forum: Object-Pascal / Delphi-Language

  Re: Quadratische und Lineare Funktion

    Delphi
    by Niels, 4. Jan 2004
  Moin!
  
  Jo mit der 0 das hatte ich vergessen....aber dann isses ja keine quadratische Gleichung mehr...aber der Vollständigkeit halber:
  
  var
  rad, a, b, c, x1, x2: Real;
  
  a := StrtoFloat(Edit1.Text); // ax^2 + bx + c
  b := StrToFloat(Edit2.Text);
  c := StrToFloat(Edit3.Text);
• Forum: Object-Pascal / Delphi-Language

  Re: Quadratische und lineare Funktion

    Delphi
    by Niels, 4. Jan 2004
  Moin!
  
  Du hast dich jetzt komisch ausgedrückt.
  
  Willst du die Nullstelle einer quadratischen und einer lineraren Funktion? (das wäre ja das was du gefragt hast)
  Dann musst du die lineare von der quadratischen subtrahieren und dann mit der quadratischen Lösungsformel die 0-Stellen dieser Hilfsgleichung berechnen.
  
  Oder willst du die Nullstellen von quadratischen bzw lineraren Funktionen?...