Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked

Re: Re: Re: Prime Number Finder

by LanceDeeply (Chaplain)
on Jul 17, 2002 at 19:58 UTC ( #182564=note: print w/ replies, xml ) Need Help??

in reply to Re: Re: Prime Number Finder
in thread Prime Number Finder

nope! they all look prime to me!
i like it, i'm gonna use it to explain programming loops to a mathmatician friend. i took the liberty to re-arrange a touch...

sub isPrime { my $number = shift; my $sqrt = sqrt $number; my $d = 2; while (1) { return 0 if ( $number % $d == 0 ); return 1 if ( $d > $sqrt ); $d++; } }

Comment on Re: Re: Re: Prime Number Finder
Download Code

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://182564]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others musing on the Monastery: (6)
As of 2015-10-14 04:29 GMT
Find Nodes?
    Voting Booth?

    Does Humor Belong in Programming?

    Results (320 votes), past polls