Registriert seit: 9. Dez 2010
Ort: Mönchengladbach
1.736 Beiträge
Delphi 6 Enterprise
|
AW: Primzahl
18. Mai 2011, 08:50
Weitere Optimierung wäre:
teiler:=3;
in zusammenarbeit mit
zahl:=zahl+2;
und
teiler:=teiler+2;
So werden alle geraden Zahlen (>2) übersprungen, da sie ja eh nicht prim sind.
Ralph
Geändert von Jumpy (18. Mai 2011 um 08:52 Uhr)
|