A045788 Squares with initial digit '5'.

529, 576, 5041, 5184, 5329, 5476, 5625, 5776, 5929, 50176, 50625, 51076, 51529, 51984, 52441, 52900, 53361, 53824, 54289, 54756, 55225, 55696, 56169, 56644, 57121, 57600, 58081, 58564, 59049, 59536, 501264, 502681, 504100, 505521

Offset

1,1

Links

Robert Israel, Table of n, a(n) for n = 1..10000

Maple

seq(op(map(`^`, [seq(i, i=ceil(sqrt(5*10^d))..floor(sqrt(6*10^d-1)))], 2)), d=1..5); # Robert Israel, Sep 30 2016

Mathematica

Flatten[Table[Range[Ceiling[Sqrt[5 10^n]], Floor[Sqrt[6 10^n]]]^2, {n, 5}]]  (* Harvey P. Dale, Jun 15 2011 *)

Crossrefs

Cf. A045784, A045785, A045786, A045787, A045789, A045791, A045792, A045793.

Sequence in context: A204684 A205160 A205309 * A339636 A181414 A020289

Adjacent sequences: A045785 A045786 A045787 * A045789 A045790 A045791

Keyword

nonn,base

Author

Jeff Burch

Extensions

Offset changed by Robert Israel, Sep 30 2016

Status

approved