%I#8 2012年3月30日18:39:00

%S 1,3,27,511351381861873524795259239281286157818071886，

%电话：192628163358343857275015215681620451213094221368255348，

%电话：257350329046403004434010442520449599450069445243045752459665

%N a（1）=1；a（n）是最小整数>a（n-1），使得S（n）的简单连分式的元素之和＝1/a（1）+1/a（2）++1/a（n）等于n^2。

%e1/a（1）+1/a（2）+1/a。

%ta[1]=1；a[n_]：=a[n]=（s=Sum[1/a[i]，{i，1，n-1}]；While[Plus@@ContinuedFraction[s+1/k]！=n^2，k++]；k）；k=1；做[打印[a[n]]，{n，1，40}]

%o（PARI）s=1；t=1；对于（n=2,40，s=s+1/t；而（abs（n^2+1-sum（i=1，长度（contfrac（s+1/t））），分量（contfrac+1/t，i））>0，t++）；打印1（t，“，”）

%K容易，不是

%O 1,2号机组

%2002年6月10日，A _贝尼特·克洛伊特

%E编辑：Robert G.Wilson v_，2002年6月17日