{90, 189, 288, 387, 486, 585, 684, 783, 882, 981, 990, 1089, 1188, 1287, 1386, 1485, 1584, 1683, 1782, 1881, 1980, 1989, 2088, 2187, 2286, 2385, 2484, 2583, 2682, 2781, 2880, 2979, 2988, 3087,
3186, 3285, 3384, 3483, 3582, 3681, 3780, 3879, 3978, 3987, 4086, 4185, 4284, 4383, 4482, 4581, 4680, 4779, 4878, 4977, 4986, 5085, 5184, 5283, 5382, 5481, 5580, 5679, 5778, 5877, 5976, 5985,
6084, 6183, 6282, 6381, 6480, 6579, 6678, 6777, 6876, 6975, 6984, 7083, 7182, 7281, 7380, 7479, 7578, 7677, 7776, 7875, 7974, 7983, 8082, 8181, 8280, 8379, 8478, 8577, 8676, 8775, 8874, 8973,
8982, 9081, 9180, 9279, 9378, 9477, 9576, 9675, 9774, 9873, 9972, 9981, 9990, 10089, 10188, 10287, 10386, 10485, 10584, 10683, 10782, 10881, 10980, 10989, 11088, 11187, 11286, 11385, 11484,
11583, 11682, 11781, 11880, 11979, 11988, 12087, 12186, 12285, 12384, 12483, 12582, 12681, 12780, 12879, 12978, 12987, 13086, 13185, 13284, 13383, 13482, 13581, 13680, 13779, 13878, 13977,
13986, 14085, 14184, 14283, 14382, 14481, 14580, 14679, 14778, 14877, 14976, 14985, 15084, 15183, 15282, 15381, 15480, 15579, 15678, 15777, 15876, 15975, 15984, 16083, 16182, 16281, 16380,
16479, 16578, 16677, 16776, 16875, 16974, 16983, 17082, 17181, 17280, 17379, 17478, 17577, 17676, 17775, 17874, 17973, 17982, 18081, 18180, 18279, 18378, 18477, 18576, 18675, 18774, 18873,
Complement[Range[9, #, 9], Array[# - Tr@IntegerDigits@# &, # + 9 IntegerLength@#]] &[99999]——这个代码也可以——可惜不是通项公式。
这串数——看个位数——0, 9, 8, 7, 6, 5, 4, 3, 2, 1, 0, 9, 8, 7, 6, 5, 4, 3, 2, 1, 0, .....——十个数码循环。
这串数——往简单想——就是个等差级数。——可就是没有通项公式。 |