A062906 Numbers k such that k and its reversal are both multiples of 17.

272, 323, 595, 646, 969, 1156, 1207, 1479, 2720, 2992, 3230, 3553, 3604, 3876, 3927, 4063, 4114, 4386, 4437, 5950, 6460, 6511, 6783, 6834, 7021, 7293, 7344, 7667, 7718, 8177, 8228, 9690, 9741, 10047, 11560, 11611, 11883, 11934, 12070, 12121, 12393

Offset: 1

Author

Amarnath Murthy, Jul 01 2001

Keywords

• nonn
• base
• easy

Examples

			1156 and 6511 are both multiples of 17.
		

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..1000

Programs

ARIBAS

n := 17; stop := 12500; m := 0; while m < stop do rev := int_reverse(m); if rev mod n = 0 then write(m," "); end; inc(m,n); end;

Mathematica

Select[ Range[ 30000 ], Mod[ #, 17 ] == 0 && Mod[ FromDigits[ Reverse[ IntegerDigits[ # ] ] ], 17 ] == 0 & ]
Select[Range[13000],And@@Divisible[{#,IntegerReverse[#]},17]&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jan 09 2021 *)

Extensions

Corrected and extended by Dean Hickerson and Reiner Martin, Jul 06 2001