OFFSET
1,3
EXAMPLE
111 is in the sequence because 1*1*1 = 1 = 0^0.
MATHEMATICA
Select[Range[0, 500], Times@@ IntegerDigits[#] <2 &] (* Indranil Ghosh, Mar 26 2017 *)
PROG
(Magma) Set(Sort([n: n in [1..10000], k in [0..20] | &*Intseq(n) eq 0^k]))
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Jaroslav Krizek, Mar 26 2017
STATUS
approved