Anonymous user
Factors of a Mersenne number: Difference between revisions
m
→{{header|Fortran}}: lang tag
m (→{{header|Fortran}}: lang tag) |
|||
Line 126:
=={{header|Fortran}}==
{{works with|Fortran|90 and later}}
IMPLICIT NONE
INTEGER :: exponent, factor
Line 177:
Mfactor = 0
END FUNCTION
END PROGRAM EXAMPLE</lang>
Output
M929 has a factor: 13007
=={{header|Mathematica}}==
| |||