Anonymous user
Mersenne primes: Difference between revisions
m
→{{header|REXX}}: changed a glyph in a comment.
m (→{{header|zkl}}: tweak o rama) |
m (→{{header|REXX}}: changed a glyph in a comment.) |
||
Line 645:
if !.m then iterate /*M must be either one or seven.*/
parse var q '' -1 _; if _==5 then iterate /*last digit a five ?*/
if q// 3==0 then iterate /*
if q// 7==0 then iterate /* " " seven ?*/
if q//11==0 then iterate /* " " eleven ?*/
Line 657:
if sq==1 then return q /*Not a prime? Return a factor.*/
end /*k*/</lang>
<br><br>
=={{header|Ring}}==
| |||