OFFSET
1,2
REFERENCES
Felice Russo, A set of new Smarandache functions, sequences and conjectures in number theory, American Research Press 2000
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
MATHEMATICA
nzsQ[n_]:=Module[{pd=Times@@IntegerDigits[n]}, pd!=0&&IntegerQ[Sqrt[pd]]]; Select[Range[2000]^2, nzsQ] (* Harvey P. Dale, Nov 13 2012 *)
CROSSREFS
KEYWORD
easy,base,nonn
AUTHOR
Felice Russo, Feb 25 2000
EXTENSIONS
More terms from James A. Sellers, Feb 28 2000
STATUS
approved