Largest difference between adjacent primes: Difference between revisions
Largest difference between adjacent primes (view source)
Revision as of 22:04, 24 December 2021
, 2 years agoAdded 11l
Alextretyak (talk | contribs) (Added 11l) |
|||
Line 5:
Find and show on this page the largest difference between adjacent primes under 1,000,000.
<br><br>
=={{header|11l}}==
<lang 11l>F primes_upto(limit)
V is_prime = [0B] * 2 [+] [1B] * (limit - 1)
L(n) 0 .< Int(limit ^ 0.5 + 1.5)
I is_prime[n]
L(i) (n * n .. limit).step(n)
is_prime[i] = 0B
R enumerate(is_prime).filter((i, prime) -> prime).map((i, prime) -> i)
V primes = primes_upto(1'000'000)
V maxdiff = 0
L(n) 1 .< primes.len
maxdiff = max(maxdiff, primes[n] - primes[n - 1])
print(‘Largest difference is = ’maxdiff)</lang>
{{out}}
<pre>
Largest difference is = 114
</pre>
=={{header|ALGOL 68}}==
Line 53 ⟶ 75:
Largest gap between primes up to 10000000: 154 between 4652353 and 4652507
</pre>
=={{header|AWK}}==
<lang AWK>
| |||