OFFSET
0,1
LINKS
P. J. Hendriks, Puzzle 114, Salami-numbers
HP-museum mailing list, an algorithm for finding a(0): HP71B algorithm.
PROG
(PARI) issalami(p, order) = ok=1; count=truncate(log(p)/log(10)+1); ordlen=truncate(log(order)/log(10)); for(i=1, count-ordlen, test=(truncate(p/10^(count-i-ordlen)+0.)/(i+order-1)); if(test!=truncate(test+0.), ok=0)); return(ok) findsalami(x, order) = for(i=0, 9, if(issalami(x*10+i, order)==1, if(maxsalami<x*10+i, maxsalami=x*10+i); findsalami(x*10+i, order))) for(order=1, 30, maxsalami=0; for(t=1, 99, findsalami(t, order)); print("Order "order":"maxsalami))
CROSSREFS
KEYWORD
nonn
AUTHOR
Christ van Willegen (cvwillegen(AT)gmail.com), Jan 13 2006
STATUS
approved