Ultra useful primes: Difference between revisions
Content added Content deleted
(Added Algol 68) |
m (→{{header|ALGOL 68}}: tiny tweak) |
||
Line 33: | Line 33: | ||
LONG LONG INT two up 2 up n = LONG LONG INT( 2 ) ^ ( 2 ^ n ); |
LONG LONG INT two up 2 up n = LONG LONG INT( 2 ) ^ ( 2 ^ n ); |
||
FOR i BY 2 |
FOR i BY 2 |
||
WHILE |
WHILE IF is probably prime( two up 2 up n - i ) THEN |
||
IF found a prime THEN |
|||
# found a sequence member # |
# found a sequence member # |
||
print( ( " ", whole( i, 0 ) ) ); |
print( ( " ", whole( i, 0 ) ) ); |