Primality by trial division: Difference between revisions

m
Line 2,936:
=={{header|M2000 Interpreter}}==
<syntaxhighlight lang="m2000 interpreter">
Module Primality_by_trial_division {
Inventory Known1=2@, 3@
IsPrime=lambda Known1 (x as decimal) -> {
=false
if exist(Known1, x) then =true : exit
Line 2,952 ⟶ 2,953:
always
}
i=2
While Len(Known1)<20 {
dummy=Isprime(i)
i++
i++
End While
}
Print "first ";len(known1);" primes"
Print Known1
Print "From 110 to 130"
count=0
For i=110 to 130 {
If isPrime(i) Then Print i, : count++
Next
}
Print
Print "Found ";count;" primes"
}
Primality_by_trial_division
</syntaxhighlight>
 
404

edits