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