%I#19 2023年12月28日13:12:51

%S 1,2,4,5,6,8,10,12,16,18,20,22,26,34,37,40,42,44,48,52,54,60,62,64,70，

%电话76,79,88,94,96102104108114118122130136152156158170172，

%电话：1741941962022072102172282342392482622682280281

%N sqrt（N）的连分数增加周期（sqrt的连分数周期（A013645（N）））。

%H Patrick McKinley，n的表，n=1..512的a（n）</a>

%t per[n_]：=连续分数[Sqrt[n]][[2]]//长度；记录=0；t=Reap[对于[n=1，n<2*10^4，n++，如果[！IntegerQ[Sqrt[n]]，p=per[n]；如果[p>record，record=p；打印[{n，p}]；母猪[{n，p}]]]][[2，1]]；A020640=t[[全部，2]]（*_Jean-François Alcover_，2012年12月27日*）

%t删除重复项[Table[If[IntegerQ[Sqrt[n]]，Nothing，Length[ContinuedFraction[Sqrt[n][[2]]]，{n，20000}]，GreaterEqual]（*哈维·P·戴尔，2023年12月28日*）

%K nonn很好

%O 1,2号机组

%大卫·W·威尔逊_