A341176 Numbers that when divided by the sum of their digits leave 9 as remainder.
19, 57, 69, 93, 99, 109, 119, 129, 139, 149, 159, 165, 169, 179, 189, 199, 218, 237, 249, 256, 273, 275, 279, 294, 297, 309, 317, 339, 345, 369, 373, 381, 384, 387, 389, 416, 417, 429, 453, 457, 459, 474, 477, 485, 490, 495, 515, 519, 525, 527, 549, 561, 564
Offset: 1
Examples
a(1) = 19 and 19 is 10*1 with remainder 9; a(2) = 57 and 57 is 12*4 with remainder 9; etc.
Links
- Carole Dubois, Table of n, a(n) for n = 1..5001
Crossrefs
Programs
-
Mathematica
Select[Range[600],Mod[#,Total[IntegerDigits[#]]]==9&] (* Harvey P. Dale, Feb 02 2022 *)
-
PARI
isok(n) = n%sumdigits(n) == 9; \\ Michel Marcus, Feb 06 2021