OFFSET
1,1
EXAMPLE
30^2 = 900, 990025 = 995^2.
MAPLE
F:= proc(d) local m, D, P;
m:= 9*10^d+25;
D:= numtheory:-divisors(m);
P:= map(t -> (m/t - t)/20, select(t -> t^2 < m and (m/t - t) mod 20 = 0, D));
op(select(t -> 10^(d-3) <= t^2 and t^2 < 10^(d-2), P));
end proc:
seq(F(n), n=4..83); # Robert Israel, Apr 04 2017
CROSSREFS
KEYWORD
nonn,base,more
AUTHOR
Chai Wah Wu, Nov 23 2014
STATUS
approved