A068075 Lesser of a primitive pair such that n and its 10's complement are simultaneously square.

1, 36, 324, 123904, 3968064, 28901376, 14997431296, 434207195136, 2552428007424, 1780607738773504

Offset

1,2

Comments

If k is in the sequence so is k * 100^m.

Links

Table of n, a(n) for n=1..10.

Mathematica

Do[ If[n^2 <= 5*10^Floor[ Log[10, n^2]] && IntegerQ[ Sqrt[ 10^Floor[ Log[10, n^2] + 1] - n^2]] && Take[ IntegerDigits[n^2], -1] != {0}, Print[n^2]], {n, 1, 4*10^6}]

Crossrefs

Cf. A068810.

Sequence in context: A213124 A067473 A223299 * A219004 A053136 A000821

Adjacent sequences: A068072 A068073 A068074 * A068076 A068077 A068078

Keyword

base,nonn

Author

Robert G. Wilson v, Mar 20 2002

Status

approved