A098947 Numbers where 5 is the only odd decimal digit.

5, 25, 45, 50, 52, 54, 55, 56, 58, 65, 85, 205, 225, 245, 250, 252, 254, 255, 256, 258, 265, 285, 405, 425, 445, 450, 452, 454, 455, 456, 458, 465, 485, 500, 502, 504, 505, 506, 508, 520, 522, 524, 525, 526, 528, 540, 542, 544, 545, 546, 548, 550, 552, 554

Offset: 1

Author

Eric Angelini, Oct 21 2004

Keywords

• base
• easy
• nonn

Comments

This is a 10-automatic language. - Charles R Greathouse IV, Oct 03 2011

Links

• Index entries for 10-automatic sequences

Programs

Mathematica

Select[Range[600],Union[Select[IntegerDigits[#],OddQ]]=={5}&] (* Harvey P. Dale, Jun 13 2014 *)

Perl

for (0..1000) {
    print "$_, " if (/^[024568]*5[024568]*$/)
} # Charles R Greathouse IV, Oct 05 2011