Zsigmondy numbers: Difference between revisions
→{{header|ALGOL 68}}: Slight optimisation
(→{{header|ALGOL 68}}: Notes...) |
(→{{header|ALGOL 68}}: Slight optimisation) |
||
Line 105:
INTEGER d := 1;
INTEGER max d := isqrt( an minus bn );
WHILE ( d +:= 1 ) <= max d AND largest divisor <= max d DO
IF an minus bn MOD d = 0 THEN
# d is a divisor of a^n - b^n #
|