A087095 a(n) = A077503(n) - n*10^d, where d = n-A055642(n), A055642(n) = number of digits in n.

0, 5, 24, 96, 176, 625, 1316, 13025, 0, 14129, 24161, 580921, 1310976, 4588964, 7007601, 0, 233634401, 244436761, 2180575376, 3762025, 23492302009, 71829444801, 293908889924, 357018382249, 2562501107225, 2194311769649

Offset: 1

Author

Ray Chandler, Aug 11 2003

Keywords

• nonn
• base

Examples

			a(7) = 7001316 - 7000000 = 1316.
		

Crossrefs

Cf. A055642, A077503.

Programs

Mathematica

ceil[n_]:=Module[{d=n-IntegerLength[n],c},c=n*10^d;Ceiling[Sqrt[c]]^2-c]; Array[ceil,30] (* Harvey P. Dale, Sep 03 2018 *)

Formula

a(n) = ceiling(sqrt(n*10^d))^2 - n*10^d, where d = n-digit(n), digit(n) = number of digits in n.

Extensions

Edited by Charles R Greathouse IV, Aug 03 2010