Registriert seit: 20. Jun 2004
Ort: Berlin
89 Beiträge
Delphi 7 Enterprise
|
Re: In einer Listbox nach Strings suchen
19. Jan 2005, 18:29
Also mein programm schafft es von 0-5.000.000 in 72s (laut Taskmgr). (P4 3GHz)
interesse am programm/ergebnissdatei?
Meine vorgehensweise:
ich berechne alle primzahlen von 0-5.000.000 und speichere diese in einem array.
dann berechne ich aus jeder dieser primzahlen den wert ((p-1)/2) besser ((p-1) shr 1) *g* und prüfe ob das ergebnis im primzahlenarray ist, fertig.
PS: das primzahlenprogramm ansich hatte ich bereits, ich hab es nur ergänzt.
Wenn ich irgendwas falsch verstanden habe, dann sag es mir bitte *g*
die ersten paar Zahlen unter 100
5
7
11
23
47
59
83
EDIT: es gibt "nur" 348.513 Primzahlen im bereich 0-5.000.000
Edit2: Ja ich werd mir abgewöhnen immer leerzeilen zu machen...
Thomas H.
|