%I A104265
%S A104265 1,16,121,1156,11236,111556,1115136,11115556,111112681,1111155556,
%T A104265 11111478921,111111555556,1111118377216,11111115555556,111111226346761,
%U A104265 1111111155555556,11111112515384644,111111111555555556
%N A104265 Smallest n-digit square with no zero digits.
%e A104265 a(3) = Min{121, 144, 169, 196, ....} = 121.
%t A104265 f[n_] := Block[{k = Ceiling[ Sqrt[10^n]]}, While[ Union[ IntegerDigits[ 
               k^2]][[1]] == 0, k++ ]; k^2]; Table[ f[n], {n, 0, 20}] (from Robert 
               G. Wilson v Mar 02 2005)
%Y A104265 Cf. A104266, A104264, A052041.
%Y A104265 Sequence in context: A081071 A069658 A069667 this_sequence A068880 A053883 
               A030508
%Y A104265 Adjacent sequences: A104262 A104263 A104264 this_sequence A104266 A104267 
               A104268
%K A104265 nonn,base
%O A104265 1,2
%A A104265 Reinhard Zumkeller (reinhard.zumkeller(AT)gmail.com), Feb 26 2005
%E A104265 More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Mar 02 2005