Mit Perl rechnen - #111842 (Allgemeines zu Perl)

Napstack

2008-07-04 18:31

User since
2008-07-03
32 Artikel
BenutzerIn
[default_avatar]

ich hab n bissl gesuch und das gefunden

Code (perl): (dl )

               if ($Zahl % $p >= 1){

ich will damit erreichen dass das

Code (perl): (dl )

1
2

                        print $Zahl, "\n";
                        push @prime, $Zahl;

wieder stimmt. Sonst wird ja immer wenn die Zahl keine primzahl ist die Zahl ausgegeben und in @prime gespeichert.