Mersenne primes: Difference between revisions
Content added Content deleted
(Added D) |
No edit summary |
||
Line 177: | Line 177: | ||
</pre> |
</pre> |
||
=={{header|Ring}}== |
|||
<lang ring> |
|||
# Project : Mersenne primes |
|||
# Date : 2018/01/22 |
|||
# Author : Gal Zsolt [~ CalmoSoft ~] |
|||
# Email : <calmosoft@gmail.com> |
|||
n = 0 |
|||
while true |
|||
n = n +1 |
|||
if isprime(pow(2,n)-1) = 1 |
|||
see n + nl |
|||
ok |
|||
end |
|||
func isprime num |
|||
if (num <= 1) return 0 ok |
|||
if (num % 2 = 0) and num != 2 return 0 ok |
|||
for i = 3 to floor(num / 2) -1 step 2 |
|||
if (num % i = 0) return 0 ok |
|||
next |
|||
return 1 |
|||
</lang> |
|||
Output: |
|||
<pre> |
|||
2 |
|||
3 |
|||
5 |
|||
7 |
|||
13 |
|||
17 |
|||
19 |
|||
</pre> |
|||
=={{header|zkl}}== |
=={{header|zkl}}== |