login
A175741
Integers n for which the period of the decimal expansion of 1/n is 100.
1
25351, 50702, 60101, 76053, 101404, 120202, 126755, 152106, 180303, 202808, 228159, 240404, 253510, 278861, 300505, 304212, 360606, 380265, 405616, 456318, 480808, 507020, 510151, 540909, 557722, 601010, 608424, 633775, 661111, 721212, 760530, 811232, 836583, 888791, 901515, 912636, 961616
OFFSET
1,1
COMMENTS
Numbers such that A007732(n) = 100. - Andrew Howroyd, Jan 14 2020
LINKS
MATHEMATICA
Transpose[Select[Table[{n, Length[RealDigits[1/n][[1, -1]]]}, {n, 500000}], #[[2]]==100&]][[1]]
PROG
(PARI) is(n)={my(t=n/(2^valuation(n, 2)*5^valuation(n, 5))); 100==znorder(Mod(10, t))}
{for(n=1, 10^6, if(is(n), print1(n, ", ")))} \\ Andrew Howroyd, Jan 14 2020
CROSSREFS
Sequence in context: A174825 A269041 A130615 * A203090 A251227 A183648
KEYWORD
nonn,base
AUTHOR
Harvey P. Dale, Dec 04 2010
EXTENSIONS
Terms a(22) and beyond from Andrew Howroyd, Jan 14 2020
STATUS
approved