%I#12 2023年3月14日03:39:56

%S 4536071280842409979211016011793612312014904154224162000，

%电话：17236818532818792020080207360208656210000239760242352，

%电话：263088265680270000270864278640281232286416290304304560320112327888

%N个整数，正好有100个除数。

%C发件人：Zak Seidov，2009年8月7日：（开始）

%C编号n，A000005（n）=τ（n）=100。

%C a（1）=45360，因为45360=2^4*3^4*5^1*7^1，而tau（45360）=A000005（4536）=（4+1）（4+1”）（1+1）（1+10）=100。

%第一个奇数项是a（536）=3898125=3^4*5^4*5 ^7*1^1。（结束）

%C这些是带有素数签名的数字{99}、{49,1}、}24,3}、[19,4}、[9,9}、[24,1,1}，[9,4,1}]、[4,4,3}]和[4,4],1}_T.D.Noe_，2011年5月9日

%H T.D.Noe，n表，n=1..1000时的a（n）</a>

%e a（1）=45360，可被100个因数整除：(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 12, 14, 15, 16, 18, 20, 21, 24, 27, 28, 30, 35, 36, 40, 42, 45, 48, 54, 56, 60, 63, 70, 72, 80, 81, 84, 90, 105, 108, 112, 120, 126, 135, 140, 144, 162, 168, 180, 189, 210, 216, 240, 252, 270, 280, 315, 324, 336, 360, 378, 405, 420, 432, 504, 540, 560, 567, 630, 648, 720, 756, 810, 840, 945, 1008, 1080, 1134, 1260, 1296, 1512, 1620, 1680, 1890, 2160, 2268, 2520, 2835, 3024, 3240, 3780, 4536, 5040, 5670, 6480, 7560, 9072, 11340, 15120, 22680, 45360)

%tS={}；Do[If[DivisorSigma[0，n]==100，AppendTo[S，n]]，{n，45360,10^7}]；S（*_Zak Seidov，2009年8月7日*）

%Y参考A000005。

%K容易，不是

%O 1,1号机组

%A _Gil Broussard，2009年8月4日