Factors of a Mersenne number: Difference between revisions

m
Bug fix
m (Bug fix)
m (Bug fix)
Line 603:
integer k = 0;
integer q = 1;
dofor (;;)
{
++k;
q = 2 * k * p + 1;
while if (q <>= limit);
break;
if (q % 8 == 1 || q % 8 == 7)
{
Line 613 ⟶ 615:
}
}
while (q < limit);
return 0;
}
1,777

edits