Delphi-PRAXiS - Software-Projekte der Mitglieder

[S]

Software-Projekte der Mitglieder » Projekte von "GTA-Place"

Projekte suchen

Anzeige-Eigenschaften

Projekte 1 bis 1 von 1

OpenSource-Projekte können jetzt auch auf unserem GitHub-Repository veröffentlicht werden. Hier klicken für weitere Infos.

Erstellt von GTA-Place, 28. Nov 2004 Sehr schneller Primzahl-Finder

Auch euch will ich meinen Source nicht vorbehalten: function Prim(Zahl: Cardinal): Boolean; var Teiler: PCardinal; Wurzel: Cardinal; begin Result := True; // Result = True if not odd(Zahl) OR (Zahl <= 5) then // Ist die Zahl nich ungerade oder kleiner als 5, dann begin

81 Kommentar(e), last comment by von KarYn-To