A134843 - OEIS

A134843

Numbers n not divisible by 10 such that n^2 contains a 0.

32, 33, 45, 47, 48, 49, 51, 52, 53, 55, 64, 71, 78, 84, 95, 97, 98, 99, 101, 102, 103, 104, 105, 138, 142, 143, 144, 145, 147, 148, 149, 151, 152, 153, 155, 174, 175, 176, 179, 195, 197, 198, 199, 201, 202, 203, 205, 217, 224, 225, 226, 241, 243, 245, 246, 247

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

Harvey P. Dale, Table of n, a(n) for n = 1..1000

J. Browkin, Groebner basis.

EXAMPLE

a(1)=32 because 1024=32^2

MATHEMATICA

a = {}; Do[Do[Do[k = 100s + 10n + m; w = IntegerDigits[k^2]; If[MemberQ[w, 0], AppendTo[a, k]], {m, 1, 9}], {n, 0, 9}], {s, 0, 9}]; Union[a]

Select[Range[300], Mod[#, 10]!=0&&DigitCount[#^2, 10, 0]>0&] (* Harvey P. Dale, Nov 15 2023 *)

CROSSREFS