Delphi-PRAXiS - Einzelnen Beitrag anzeigen - Sehr schneller Primzahl-Finder

**Phantom1**

Achso ist das...

Ich habe beide möglichkeiten mal getestet:
Primes.IndexOf(500Mio, False); ergab eine Zeit von 798ms

Delphi-Quellcode:

			I := 0;

  while Primes[i] < 500000000 do

    Inc(I);

ergab eine Zeit von 2869ms

mfg
Phantom1

Phantom1 Registriert seit: 20. Jun 2003 282 Beiträge Delphi 10.4 Sydney	#61 Re: Sehr schneller Primzahl-Finder 23. Aug 2005, 20:52 Achso ist das... Ich habe beide möglichkeiten mal getestet: Primes.IndexOf(500Mio, False); ergab eine Zeit von 798ms markieren Delphi-Quellcode: I := 0; while Primes[i] < 500000000 do Inc(I); ergab eine Zeit von 2869ms mfg Phantom1
	Zitat