Jump to content

Factorial primes: Difference between revisions

m
→‎{{header|ALGOL 68}}: (very) small tweak
(Added Algol 68)
m (→‎{{header|ALGOL 68}}: (very) small tweak)
Line 43:
FOR n WHILE fp count < 10 DO
f *:= n;
IF LONG INT fp := f - 1;
is probably prime( fp ) THEN
THEN
fp count +:= 1;
show factorial prime( fp count, n, "-", fp )
FI;
IF LONG INT fp := f + 1;
is probably prime( fp ) THEN
THEN
fp count +:= 1;
show factorial prime( fp count, n, "+", fp )
3,048

edits

Cookies help us deliver our services. By using our services, you agree to our use of cookies.