login
Squares with initial digit '1'.
12

%I #16 Sep 04 2021 19:17:31

%S 1,16,100,121,144,169,196,1024,1089,1156,1225,1296,1369,1444,1521,

%T 1600,1681,1764,1849,1936,10000,10201,10404,10609,10816,11025,11236,

%U 11449,11664,11881,12100,12321,12544,12769,12996,13225,13456,13689,13924

%N Squares with initial digit '1'.

%H N. J. A. Sloane, <a href="/A045784/b045784.txt">Table of n, a(n) for n = 1..20000</a>

%F a(n) = A045855(n)^2. - _Michel Marcus_, Sep 04 2021

%t Select[Range[120]^2,First[IntegerDigits[#]]==1&] (* _Harvey P. Dale_, Dec 31 2011 *)

%Y Cf. A045855.

%Y Cf. A045785, A045786, A045787, A045788, A045789, A045791, A045792, A045793.

%K nonn,base

%O 1,2

%A _Jeff Burch_