Download or view ponderThis201004b.frink in plain text format
a = int[1.09e+124]
a = 10964973879145266684597918386961206640359744239118799335560543882943204057285999161085137407678295834997000000000000000000000
//a = 10964980000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
//a = 11382975651657608000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
//a = 25000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
dd = 0
do
{
n = hex[a]
astr= "$a"
atstr = left[astr, length[astr]-21]
if length[atstr] < length[n]
{
a = a * 2
dd = 1
} else
{
ah = parseInt[atstr, 16]
diff = ah-a
println[a]
println[n]
println[atstr]
println[(1.0) diff]
dd = diff div 2
if (dd != 0)
a = nextPrime[a + dd+752]
}
} while dd != 0
if (dd == 0)
{
println["SOLUTION:"]
println[a]
println[hex[a]]
// aa = nextPrime[a]
}
Download or view ponderThis201004b.frink in plain text format
This is a program written in the programming language Frink.
For more information, view the Frink
Documentation or see More Sample Frink Programs.
Alan Eliasen was born 20139 days, 7 hours, 36 minutes ago.