A034101 Numbers whose fractional part of square root starts with digit 5.

21, 31, 43, 57, 73, 91, 92, 111, 112, 133, 134, 157, 158, 183, 184, 211, 212, 213, 241, 242, 243, 273, 274, 275, 307, 308, 309, 343, 344, 345, 381, 382, 383, 384, 421, 422, 423, 424, 463, 464, 465, 466, 507, 508, 509, 510, 553, 554, 555, 556, 601, 602, 603

Offset: 1

Author

Patrick De Geest, Sep 15 1998

Keywords

• nonn
• easy
• base

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..1001 [offset to 1 adapted by _Georg Fischer_, Sep 03 2020]

Crossrefs

Cf. A034111.

Programs

Mathematica

fp5Q[n_]:=Module[{rd=RealDigits[N[FractionalPart[Sqrt[n]]]]},rd[[2]]==0 && First[rd[[1]]]==5]; Select[Range[700],fp5Q] (* Harvey P. Dale, Jan 11 2013 *)