OFFSET
0,1
PROG
(PARI) maxpmindivc(n) = { for(x=4, n, s=0; forstep(p=2, x-1, 1, if(x%p==0 & isprime(p), s=p; break); ); forstep(p=x-1, 2, -1, if(x%p==0 & isprime(p), print1(s+p, ", "); break); ) ) }
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Cino Hilliard, Aug 13 2003
STATUS
approved