Truncatable primes: Difference between revisions

Content added Content deleted
Line 191: Line 191:
}
}


isTruncatablePrime: @(nums){ all nums => isPrime }
isTruncatablePrime: @(nums)-> all nums => isPrime


MaxLeft: 0
MaxLeft: 0
Line 197: Line 197:


loop [rangeBy 3 1000000 2] @(n){
loop [rangeBy 3 1000000 2] @(n){
if [isTruncatablePrime [leftTrunc n]] { MaxLeft: n }
if [isTruncatablePrime [leftTrunc n]] -> MaxLeft: n
if [isTruncatablePrime [rightTrunc n]] { MaxRight: n }
if [isTruncatablePrime [rightTrunc n]] -> MaxRight: n
}
}


print "Max Left-Truncatable Prime found (<1000000): " + MaxLeft
print "Max Left-Truncatable Prime found (<1000000): " + MaxLeft
print "Max Right-Truncatable Prime found (<1000000): " + MaxRight
print "Max Right-Truncatable Prime found (<1000000): " + MaxRight</lang>
</lang>


{{out}}
{{out}}