Substring primes: Difference between revisions
Content added Content deleted
m (→{{header|REXX}}: changed comments and some variable names.) |
m (→Using a limit: Replaced getDigits function with a more recently added library function.) |
||
| Line 743: | Line 743: | ||
===Using a limit=== |
===Using a limit=== |
||
<lang ecmascript>import "/math" for Int |
<lang ecmascript>import "/math" for Int |
||
var getDigits = Fn.new { |n| |
|||
var digits = [] |
|||
while (n > 0) { |
|||
digits.add(n%10) |
|||
n = (n/10).floor |
|||
} |
|||
return digits[-1..0] |
|||
} |
|||
var primes = Int.primeSieve(499) |
var primes = Int.primeSieve(499) |
||
var sprimes = [] |
var sprimes = [] |
||
for (p in primes) { |
for (p in primes) { |
||
var digits = |
var digits = Int.digits(p) |
||
var b1 = digits.all { |d| Int.isPrime(d) } |
var b1 = digits.all { |d| Int.isPrime(d) } |
||
if (b1) { |
if (b1) { |
||