Additive primes: Difference between revisions
Content added Content deleted
(Added Algol 68) |
m (→{{header|ALGOL 68}}: tweak) |
||
Line 42: | Line 42: | ||
IF prime( digit sum ) THEN |
IF prime( digit sum ) THEN |
||
# the digit sum is prime # |
# the digit sum is prime # |
||
additive count +:= 1; |
|||
print( ( " ", whole( n, -3 ) ) ); |
print( ( " ", whole( n, -3 ) ) ); |
||
IF additive count MOD 20 = 0 THEN print( ( newline ) ) FI |
IF ( additive count +:= 1 ) MOD 20 = 0 THEN print( ( newline ) ) FI |
||
FI |
FI |
||
FI |
FI |