合数4484有很多约数,有多少个约数

来源:学生作业帮助网 编辑:作业帮 时间:2024/07/20 12:47:05
合数4484有很多约数,有多少个约数
x){: &&&t>tɬ绖t@%nd*MR>i lȰHHR,}g~O=L[C#}k5 ALѳ/.H̳:/(Sp(L,k(,K,IU.MRpMK1wgkhd*d*8+x敤(!JJl B@*(xy )`y<~[ V0+K$D!vK'  8c`@RPxdҧ뚟j  Ɏ]ԂzX",iQ

合数4484有很多约数,有多少个约数
合数4484有很多约数,有多少个约数

合数4484有很多约数,有多少个约数
4484=2*2*19*59
约数:
(2+1)×(1+1)×(1+1)=12个
答:有12个约数.

Option Explicit
Private Sub Command1_Click()
Dim i As Integer, n As Integer
For i = 1 To 4484
If 4484 Mod i = 0 Then n = n + 1
Next
Print n
End Sub

4484=2^2*13*59,
所以它的约数的个数为(2+1)*(1+1)*(1+1)=12个