AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Code-Bibliothek Neuen Beitrag zur Code-Library hinzufügen Delphi [Tutorial] Quadratische Gleichungen vollständig lösen
Thema durchsuchen
Ansicht
Themen-Optionen

[Tutorial] Quadratische Gleichungen vollständig lösen

Ein Thema von Wolfgang Mix · begonnen am 24. Jul 2009 · letzter Beitrag vom 10. Apr 2010
Antwort Antwort
Seite 9 von 9   « Erste     789   
Benutzerbild von Wolfgang Mix
Wolfgang Mix

Registriert seit: 13. Mai 2009
Ort: Lübeck
1.222 Beiträge
 
Delphi 2005 Personal
 
#81

Re: [Tutorial] Quadratische Gleichungen vollständig lösen

  Alt 20. Feb 2010, 20:43
Auch gut
Wolfgang Mix
if you can't explain it simply you don't understand it well enough - A. Einstein
Mein Baby:http://www.epubli.de/shop/buch/Grund...41818516/52824
  Mit Zitat antworten Zitat
Benutzerbild von Wolfgang Mix
Wolfgang Mix

Registriert seit: 13. Mai 2009
Ort: Lübeck
1.222 Beiträge
 
Delphi 2005 Personal
 
#82

Re: [Tutorial] Quadratische Gleichungen vollständig lösen

  Alt 31. Mär 2010, 20:42
Ich habe das Tutorial als PDF wegen Übersichtlichkeit nach Post #1 verschoben.

Gruss

Wolfgang
Wolfgang Mix
if you can't explain it simply you don't understand it well enough - A. Einstein
Mein Baby:http://www.epubli.de/shop/buch/Grund...41818516/52824
  Mit Zitat antworten Zitat
Namenloser

Registriert seit: 7. Jun 2006
Ort: Karlsruhe
3.724 Beiträge
 
FreePascal / Lazarus
 
#83

Re: [Tutorial] Quadratische Gleichungen vollständig lösen

  Alt 1. Apr 2010, 02:04
Ich war mal so frei, das PDF mit LaTeX neu zu machen. Oh mann, das hat jetzt wieder viel länger gedauert als es eigentlich sollte

[edit]
Aktuelle Version im 1. Beitrag.
[/edit]
  Mit Zitat antworten Zitat
alzaimar
(Moderator)

Registriert seit: 6. Mai 2005
Ort: Berlin
4.956 Beiträge
 
Delphi 2007 Enterprise
 
#84

Re: [Tutorial] Quadratische Gleichungen vollständig lösen

  Alt 1. Apr 2010, 07:29
Na, mit LaTex sieht das doch gleich viel besser aus.

Das 'geniale' Verfahren von Gammatester ist gar nicht so genial, weil es unnötigen Code produziert und am Thema vorbei geht. Wir haben es hier mit einer Fallunterscheidung zu tun, die in der Mathematik auch entsprechend gekennzeichnet wird (große öffnende geschweifte Klammer und dann untereinander die Fälle). Entsprechend sollte der Pseudocode auch aussehen:
Delphi-Quellcode:
Case sign(Value) of
  -1 : ... ;
   0 : ... ;
  +1 : ... ;
End;
oder so (das berücksichtigt sogar die ist-gleich-Null Problematik);
Delphi-Quellcode:
Case CompareValue (Value,0) of
  -1 : ... ;
   0 : ... ;
  +1 : ... ;
End;
Ich finde das Tutorial wirklich gut, denn es zeigt, wie knifflig scheinbar banale Dinge werden können, wenn man sie richtig angeht.

Da die begrenzte Genauigkeit und die damit verbundenen Probleme ausführlich behandelt werden (das ist ja der Kern der Abhandlung), müsste Wolfgang folgerichtig (und um das Thema abzurunden) auch auf die 'Ist-Gleich-Null' Problematik näher eingehen.

Z.B. Führt folgende einfache Schleife unsinnigen Ergebnissen:
Delphi-Quellcode:
Var
  x : Double;

Begin
  x:= -0.2;
  While x < 0.1 do begin
    if (x<0) or (x>0) then
      Writeln (x,' ist ungleich 0')
    else
      Writeln(x,' ist gleich 0');
    x := x + 0.1;
  End
End
Wir erwarten nach zwei Durchläufen die Ausgabe '0 ist gleich 0'. Das wird aber nicht passieren.

D.h. muss man eben Werte, die sehr nahe bei 0 liegen, als 0 behandeln. Dabei ist die Grenze vom gewählten Datentyp abhängig.
"Wenn ist das Nunstruck git und Slotermeyer? Ja! Beiherhund das Oder die Flipperwaldt gersput!"
(Monty Python "Joke Warefare")
  Mit Zitat antworten Zitat
Benutzerbild von Wolfgang Mix
Wolfgang Mix

Registriert seit: 13. Mai 2009
Ort: Lübeck
1.222 Beiträge
 
Delphi 2005 Personal
 
#85

Re: [Tutorial] Quadratische Gleichungen vollständig lösen

  Alt 1. Apr 2010, 20:03
Updated

Siehe Post #1
Wolfgang Mix
if you can't explain it simply you don't understand it well enough - A. Einstein
Mein Baby:http://www.epubli.de/shop/buch/Grund...41818516/52824
  Mit Zitat antworten Zitat
Benutzerbild von Wolfgang Mix
Wolfgang Mix

Registriert seit: 13. Mai 2009
Ort: Lübeck
1.222 Beiträge
 
Delphi 2005 Personal
 
#86

Re: [Tutorial] Quadratische Gleichungen vollständig lösen

  Alt 10. Apr 2010, 21:14
Ich bin überrascht, wieviel Interesse an diesem eigentlich
trockenen Thema besteht und natürlich auch erfreut darüber.
Vielleicht liegt es z.T. auch daran, dass Philip Zander (Namenloser)
das Ganze optisch noch optimiert hat, dem ich dafür hier noch
einmal herzlich danke!!!

Vielleicht ergibt sich demnächst ja etwas Ähnliches, wenn Interesse besteht.

Gruss

Wolfgang
Wolfgang Mix
if you can't explain it simply you don't understand it well enough - A. Einstein
Mein Baby:http://www.epubli.de/shop/buch/Grund...41818516/52824
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 9 von 9   « Erste     789   


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 06:42 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz