Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Programm Optimierung (https://www.delphipraxis.net/127239-programm-optimierung.html)

taaktaak 9. Jan 2009 20:37

Re: Programm Optimierung
 
Bei den heutigen typischen Speichergrößen aber wohl nur bei sehr große Datenmengen relevant.
Mit
Zitat:

mit geringem Mehraufwand an Performance
meinst du sicherlich "geringe Minderung der Performance" - oder?

Noedel 9. Jan 2009 20:45

Re: Programm Optimierung
 
muss das denn so kompliziert sein? ich dachte immer, man könne eine Primzahl daran erkennen, dass sie nur 2 teiler hat?!
Oder ist diese Lösung sehr langsam?


Delphi-Quellcode:
ZuUntersuchenderWert:=StrToInt(EUntergrenze.Text);
Obergrenze:=StrToInt(EObergrenze.Text);
REPEAT
  anzahlTeiler:=0;
  FOR i:=2 to ZuUntersuchenderWert-1 DO
      IF (ZuUntersuchenderWert mod i = 0) THEN inc(anzahlTeiler);
  IF (anzahlTeiler=0) and (ZuUntersuchenderWert>=2)THEN Listbox1.Items.Add(InTtoStr(ZuUntersuchenderWert));
  inc(a);
UNTIL ZuUntersuchenderWert=Obergrenze;

Namenloser 9. Jan 2009 21:09

Re: Programm Optimierung
 
Zitat:

Zitat von Noedel
Oder ist diese Lösung sehr langsam?

Ja. Das Sieb des Erasthotenes ist jedenfalls schneller...

3_of_8 9. Jan 2009 21:29

Re: Programm Optimierung
 
Kommt darauf an, was man machen will: Wenn man nur eine Primzahl überprüfen will, ist diese Methode auf jeden Fall schneller. Wenn man aber Primzahlen finden will, ist das Sieb des Erathostenes schneller - dafür hat es einen deutlich höheren Speicherverbrauch hat.

Namenloser 9. Jan 2009 21:46

Re: Programm Optimierung
 
Zitat:

Zitat von 3_of_8
Wenn man nur eine Primzahl überprüfen will, ist diese Methode auf jeden Fall schneller.

Es sei denn man hätte schon ein generiertes Sieb :wink:


Alle Zeitangaben in WEZ +1. Es ist jetzt 06:49 Uhr.
Seite 2 von 2     12   

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