%I#11 2020年10月13日15:57:39

%S 1,4,91001211441694004414846769009611521168117644624，

%电话：476156259409100001020110404106091188112321141611464116641，

%电话：1716119321198814000040401408044120943209432644494449284

%具有交换第一个和最后一个数字的属性的N平方也给出了一个平方。

%H Harvey P.Dale，n表，n=1..1000的a（n）</a>

%e 1764和4761都是正方形，因此都是成员。

%t Do[t=整数位数[n^2]；u=t；u[[1]]=t[[-1]]；u[[-1]]=t[[1]；t=起始数字[u]；如果[IntegerQ[Sqrt[t]]，打印[n^2]，{n，1，300}]

%t sfldQ[n_]：=模块[{idn=IntegerDigits[n]}，IntegerQ[Sqrt[FromDigits[连接[{idn[[-1]]}、大多数[Rest[idn]]，{idn[[1]]}]]]；加入[{1,4,9}，选择[Range[10250]^2，sfldQ]]（*哈维·P·戴尔，2020年10月13日*）

%Y参考A069706、A069708。

%K nonn，基础

%O 1,2号机组

%A _Amarnath Murthy，2002年4月8日

%E由_Robert G.Wilson v编辑和扩展_

%E编辑：N.J.A.Sloane，2009年1月20日