Largest difference between adjacent primes: Difference between revisions

Content added Content deleted
m (→‎{{header|Raku}}: add sub-headings)
(→‎{{header|Wren}}: Generalized to find the largest difference up to various limits.)
Line 77: Line 77:
import "/fmt" for Fmt
import "/fmt" for Fmt


var limit = 1e6 - 1
var limit = 1e9 - 1
var primes = Int.primeSieve(limit)
var primes = Int.primeSieve(limit)
var maxI = 0
var maxI = 0
var maxDiff = 0
var maxDiff = 0
var nextStop = 10
System.print("The largest differences between adjacent primes under the following limits is:")
for (i in 1...primes.count) {
for (i in 1...primes.count) {
var diff = primes[i] - primes[i-1]
var diff = primes[i] - primes[i-1]
Line 87: Line 89:
maxI = i
maxI = i
}
}
if (i == primes.count - 1 || primes[i+1] > nextStop) {
}
Fmt.print("Under $,d: $,d - $,d = $,d", nextStop, primes[maxI], primes[maxI-1], maxDiff)
System.print("The largest difference between adjacent primes under 1,000,000 is:")
nextStop = nextStop * 10
Fmt.print("$,d - $,d = $d", primes[maxI], primes[maxI-1], maxDiff)</lang>
}
}</lang>


{{out}}
{{out}}
<pre>
<pre>
The largest difference between adjacent primes under 1,000,000 is:
The largest differences between adjacent primes under the following limits is:
492,227 - 492,113 = 114
Under 10: 5 - 3 = 2
Under 100: 97 - 89 = 8
Under 1,000: 907 - 887 = 20
Under 10,000: 9,587 - 9,551 = 36
Under 100,000: 31,469 - 31,397 = 72
Under 1,000,000: 492,227 - 492,113 = 114
Under 10,000,000: 4,652,507 - 4,652,353 = 154
Under 100,000,000: 47,326,913 - 47,326,693 = 220
Under 1,000,000,000: 436,273,291 - 436,273,009 = 282
</pre>
</pre>