Thread Primzahlen bis einen festgelegten Wert (21 answers)
Opened by Dominik at 2017-12-13 18:22

hlubenow
 2017-12-17 01:20
#187749 #187749
User since
2009-02-22
875 Artikel
BenutzerIn
[default_avatar]
Funktioniert das mathematisch eigentlich auch?
Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27

#!/usr/bin/perl

use warnings;
use strict;

my $num = 100;
my @primzahlen = ();

sub isPrim {
    my $tocheck = shift;
    my $isprim = 1;
    my $i;
    for $i (@primzahlen) {
        if ($tocheck % $i == 0) {
            $isprim = 0;
            last;
        }
    }
    return $isprim;
}

for my $i (2 .. $num) {
    if (isPrim($i)) {
        push(@primzahlen, $i);
        print "$i\n";
    }
}

Wenn ich im Kopf überlege, ob eine Zahl eine Primzahl ist, gucke ich ja erst, ob sie durch 2 teilbar ist, dann durch 3.
Könnte sein, daß das mit allen Primzahlen zu machen ausreicht.
Dann muß man deutlich weniger Zahlen prüfen, als wenn man alle, die kleiner sind als die zu prüfende Zahl, als Divisor prüft. Aber man muß die bisherigen Primzahlen speichern.

View full thread Primzahlen bis einen festgelegten Wert