OFFSET
1,1
COMMENTS
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..74 (all terms up to 10 million)
EXAMPLE
1*64 = 16*4 = 64. Thus 164 is a term of this sequence.
9*999 = 999*9 = 8991. Thus 9999 is a term of this sequence.
MATHEMATICA
pqrsQ[n_]:=Module[{p=IntegerDigits[n][[1]], q=FromDigits[Rest[ IntegerDigits[ n]]], r=Mod[n, 10], s=Floor[n/10]}, p*q==r*s!=0 && p!=q && r!=s]; Select[ Range[100, 200000], pqrsQ] (* Harvey P. Dale, Aug 29 2020 *)
PROG
(Python)
for n in range(100, 10**5):
s = str(n)
num = int(s[:1])*int(s[1:])
if num != 0 and num == int(s[:len(s)-1])*int(s[len(s)-1:]):
print(n, end=', ')
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Derek Orr, Jul 19 2014
STATUS
approved