OFFSET
1,1
LINKS
Davin Park, Table of n, a(n) for n = 1..20000
EXAMPLE
44 is a member because 144 = 12^2 is a square.
0 is not a member because 10 is not a square.
MAPLE
t1:=[];
for k from 1 to 20000 do
if issqr(k+10^length(k)) then t1:=[op(t1), k]; fi;
od;
t1;
MATHEMATICA
Flatten[n /. Solve[10^# + n == a^2 && 10^(# - 1) <= n < 10^# && a > 0, {n, a}, Integers] & /@ Range[3]] (* Davin Park, Feb 05 2017 *)
PROG
(Magma) [n: n in [1..10000 ] | IsSquare(Seqint(Intseq(n) cat Intseq(1)))]; // Marius A. Burtea, Mar 21 2019
(PARI) isok(n) = issquare(eval(concat(1, Str(n)))); \\ Michel Marcus, Mar 21 2019
(Python)
from sympy.ntheory.primetest import is_square
def ok(n): return is_square(int('1'+str(n)))
print(list(filter(ok, range(9601)))) # Michael S. Branicky, Jun 21 2021
CROSSREFS
KEYWORD
nonn,base
AUTHOR
EXTENSIONS
Extended by Davin Park, Feb 05 2017
STATUS
approved