%I #11 Sep 04 2021 17:37:06
%S 36,324,361,3025,3136,3249,3364,3481,3600,3721,3844,3969,30276,30625,
%T 30976,31329,31684,32041,32400,32761,33124,33489,33856,34225,34596,
%U 34969,35344,35721,36100,36481,36864,37249,37636,38025,38416,38809
%N Squares with initial digit '3'.
%F a(n) = A045857(n)^2. - _Michel Marcus_, Sep 04 2021
%t Select[Range[200]^2,First[IntegerDigits[#]]==3&] (* _Harvey P. Dale_, Apr 21 2011 *)
%Y Cf. A045857.
%Y Cf. A045784, A045785, A045787, A045788, A045789, A045791, A045792, A045793.
%K nonn,base
%O 1,1
%A _Jeff Burch_