|
| |
|
| A036275号 |
| 1/n十进制展开式的周期部分。任何初始0都应置于循环末尾。 |
|
20
|
|
|
|
0, 0, 3, 0, 0, 6, 142857, 0, 1, 0, 90, 3, 769230, 714285, 6, 0, 5882352941176470, 5, 526315789473684210, 0, 476190, 45, 4347826086956521739130, 6, 0, 384615, 370, 571428, 3448275862068965517241379310, 3, 322580645161290, 0, 30, 2941176470588235, 285714, 7
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,3
|
|
|
评论
|
当n=3或6时，a（n）=n（参见De Koninck&Mercier参考）-伯纳德·肖特2020年12月2日
|
|
|
参考文献
|
Jean-Marie De Koninck和Armel Mercier，1001 Problèmes en Théorie Classique des Nombres，Probléme 347，第50和205页，Ellipses，巴黎，2004年。
|
|
|
链接
|
|
|
|
示例
|
1/28=.035714285714285714285714285.7142857128571428571…数字周期为571428，因此a（28）=571428。
|
|
|
MAPLE公司
|
isCycl:=proc（n）局部ifa，i；如果n<=2，则返回（false）；fi；ifa:=ifactors（n）[2]；对于i从1到nops（ifa），如果op（1，op（i，ifa）；fi；od；返回（假）；结束时间：A036275号：=proc（n）局部ifa，sh，lpow，mpow，r；如果不是Cycl（n），则返回（0）；否则lpow：=1；如果（10^lpow-10^mpow）mod n=0，则r:=（10^lpow-10^mbow）/n，则对mpow从lpow-1到0执行true do；r：=r mod（10^（lpow-mpow）-1）；而r*10<10^（lpow-mpow）做r:=10*r；od；收益（r）；fi；od；lpow:=lpow+1；od；fi；结束：对于从1到60的n，执行printf（“%d%d”，n，A036275号（n） ）；od#R.J.马塔尔2006年10月19日
|
|
|
数学
|
fc[n_]：=块[{q=RealDigits[1/n][[1，-1]]}，如果[IntegerQ[q]，0，While[First[q]==0，q=RotateLeft[q]]；起始数字[q]]]；
表[fc[n]，{n，36}](*雷·钱德勒，2014年11月19日，2017年6月27日修正*）
表[FromDigits[FindTransientRepeat[RealDigits[1/n，10，120][1]，3][2]，{n，40}]（*需要Mathematica版本10或更高版本*）(*哈维·P·戴尔2019年3月12日*）
|
|
|
交叉参考
|
|
|
|
关键词
|
基础,非n,容易的,美好的
|
|
|
作者
|
|
|
|
扩展
|
修正了a（92）、a（208）、a、a（248）、a和a（328），其中a（352）和a（488）缺少尾随零（见表）-菲利普·古列尔梅蒂2017年6月20日
|
|
|
状态
|
经核准的
|
| |
|
|
