A111446 Least square ending in k where k is a possible end of a square.

0, 1, 4, 25, 16, 9, 16, 121, 324, 25, 529, 36, 441, 144, 49, 256, 361, 64, 169, 576, 81, 484, 289, 196, 100, 23104, 2116, 121, 33124, 15129, 3136, 144, 1156, 14161, 20164, 169, 50176, 5184, 196, 10201, 39204, 2209, 9216, 28224, 225, 11236, 6241, 26244

Offset

0,3

Comments

Term corresponding to m^2 is m^2.

Links

Table of n, a(n) for n=0..47.

Example

6 can be the Least significant digit of a square and 16 is the least square ending in 6 hence term corresponding to 6 is 16 which also corresponds to 16. There are no squares ending in 2,3,7,8,10,11,12,13,14,15, etc.

Maple

isSquEnd := proc(n) local ldp10, i ; ldp10 := 10^nops(convert(n, base, 10)) ; for i from 0 to ldp10-1 do if ( i^2) mod ldp10 = n then RETURN(true) ; fi ; od; RETURN(false) ; end: A111446 := proc(n) option remember ; local k, ldp10, c ; if n = 0 then RETURN([0, 0]) ; else k := 1+op(2, A111446(n-1)) ; while not isSquEnd(k) do k := k+1 ; od ; ldp10 := 10^nops(convert(k, base, 10)) ; for c from 1 do if ( c^2 mod ldp10 ) = k then RETURN([c^2, k]) ; fi ; od: fi ; end: seq( op(1, A111446(n)), n=0..80) ; # R. J. Mathar, Feb 08 2008

Crossrefs

Sequence in context: A283452 A051514 A103363 * A114390 A114392 A281471

Adjacent sequences: A111443 A111444 A111445 * A111447 A111448 A111449

Keyword

base,nonn

Author

Amarnath Murthy, Aug 03 2005

Extensions

More terms from Keith Schneider (schneidk(AT)email.unc.edu), Dec 13 2007

More terms from R. J. Mathar, Feb 08 2008

Status

approved