Jump to content

Find largest left truncatable prime in a given base: Difference between revisions

→‎{{header|zkl}}: fix overflow error
(→‎{{header|Tcl}}: added zkl)
(→‎{{header|zkl}}: fix overflow error)
Line 1,238:
b,biggest := BN(1),0;
while(primes){
b.mul(*=base); // base,base^2,base^3... gets big
ps:=List();
foreach p,n in (primes,[1..base-1]){
if((z:=(p + b*n)).probablyPrime()){
ps.append(z);
if(biggest<z>biggest) biggest=z;
}
}
Anonymous user
Cookies help us deliver our services. By using our services, you agree to our use of cookies.