Thread primzahlen (8 answers)
Opened by Gast at 2008-05-23 18:48

Linuxer
 2008-05-26 23:23
#110326 #110326
User since
2006-01-27
3891 Artikel
HausmeisterIn

user image
Fällt mir jetzt erst auf:

Code: (dl )
1
2
3
4
5
6
7
8
9
sub prime_number{
return 0 if (int ($_[0]) != $_[0]);

foreach my $divider (2..sqrt($_[0])) {
my $quotient = $_[0] % $DIVIDER;
return 0 if ($qoutient == 0);
}
return 1;
}


Ist das korrekt und beabsichtigt, dass es mal $divider und mal $DIVIDER lautet?
meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!

View full thread primzahlen