Pandigital prime: Difference between revisions

m
→‎{{header|Ring}}: added performance timing
m (→‎{{header|Ring}}: added performance timing)
Line 551:
 
=={{header|Ring}}==
<lang ring>see? "working..." + nl
hi = 7654321
for z = 1 to 0 step -1
for z in ['1', '0']
see "The largest " + z + "..7 pandigital prime is "
hist = 7654321clock()
if z = 0
hi = 76543201
ok
for n = hi to 0 step -18
strn = string(n)
pandig = true
for i =in z to :'7'
if substr(strn, string(i)) = 0
pandig = false0
exit
ok
next
if pandig and isprime(n)
seeet ""= + n + nlclock()
? "" + n + " " + (et - st) / clockspersecond() * 1000 + " ms"
exit
ok
next
hi = hi * i10 +=- 29
next
seeput "done..."
 
func isprime(n)
if n % 3 = 0 return 0 ok
return false
ok
i = 5
while i * i < n
if n % i = 0 return 0 ok i += 2
if n % i = 0 return false0 ok i += 4
ok
i += 2
end
return true1</lang>
{{out|Output @ Tio.run}}
<pre>working...
The largest 01..7 pandigital prime is 765402317652413 9.84 ms
working...
The largest 10..7 pandigital prime is 765241376540231 20.30 ms
done...</pre>
The largest 0..7 pandigital prime is 76540231
done...
</pre>
 
=={{header|Ruby}}==