OFFSET
1,1
MAPLE
readlib(issqr): Digits:=100: for d from 1 to 15 do for n from floor(sqrt(10^d)) by -1 to ceil(sqrt(10^(d-1)+1)) do m:=mul(j, j=convert(n^2-1, base, 10)): if m<>0 and issqr(m+1) then printf("%d, ", n^2-1): break fi od od: # C. Ronaldo
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Amarnath Murthy, Nov 10 2003
EXTENSIONS
More terms from C. Ronaldo (aga_new_ac(AT)hotmail.com), Dec 25 2004
Definition clarified by Chai Wah Wu, Aug 14 2017
a(17) from Chai Wah Wu, Aug 16 2017
a(18)-a(23) from Chai Wah Wu, Aug 19 2017
STATUS
approved