用3,4,5,6,7这5个数字组成一个能被22整除的五位数

来源：学生作业帮助网编辑：作业帮时间：2024/04/20 22:46:34

用3,4,5,6,7这5个数字组成一个能被22整除的五位数
用3,4,5,6,7这5个数字组成一个能被22整除的五位数

用3,4,5,6,7这5个数字组成一个能被22整除的五位数
给你一个EXCEL VBA代码：
Sub 计算整除()
Dim Tex As String,Tex1 As String,P As Integer
P = 0
For i = 3 To 7
For J = 3 To 7
For K = 3 To 7
For l = 3 To 7
For M = 3 To 7
Tex = i & J & K & l & M
If (Val(Tex) Mod 22) = 0 And InStr(1,Tex,"3") > 0 And InStr(1,Tex,"4") > 0 _
And InStr(1,Tex,"5") > 0 And InStr(1,Tex,"6") > 0 _
And InStr(1,Tex,"7") > 0 Then
P = P + 1
Tex1 = Tex1 & Tex & Chr(10)
End If
Next
Next
Next
Next
Next
MsgBox "共有" & P & "个:" & Chr(10) & Tex1,,"计算结果"
End Sub
计算结果：
53746
54736
73546
74536

能被11整除的数的特征是奇数位的和与偶数位和的差能被11整除
最后一位是偶数
73546
74536
53746
54736

尾数为6，即能被2整除
奇数位为5、7、6和为18
偶数位3、4和为7，奇数位和-偶数位和=11 即能被11整除
所以可以是：53746

能被11整除的数的特征是奇数位的和与偶数位和的差能被11整除
最后一位是偶数
73546

53746
54736
73546
74536

用3,4,5,6,7这5个数字组成一个能被22整除的五位数用0,3,5,8这四个数字组成一个四位数,能组成()个有4、7、8、1、2、5六个数字,用它们组成的六位数的3倍仍然是一个六位数,也由这6个数字组成.能找出几组? 用数字5,6,7能组成多少个两位数? 用0,1,2,3,4,5,6这7个数字,能组成多少个没有重复数字的四位奇数下面有6张数字卡片用它们组成的六位数的5倍仍然是一个六位数而且也是由这6个数字组成你能找出几个4 7 8 1 2 5 用数字,1,2,3,4,5,6,7,8组成没组成无重复数字的四位数中,能被3整除的有多少个? 下面有六张数字卡片,用它们组成的六位数的5倍仍然是一个六位数,而且也是由这6个数字组成.你能找出几个?4,7,8,1,2,5 用1,3,5,7,9这5个数字组成一个三位数ABC和一个两位数D……用1,3,5,7,9这5个数字组成一个三位数ABC和一个两位数DE,再用0,2,4,6,8这5个数字组成一个三位数FGH和一个两位数IJ.求算式ABC×DE-FGH×IJ的计算用0,1,2,3,4,5,6,7这八个数字能组成多少个无重复数字的四位偶数? 用0-5这6个自然数能组成多少没有重复数字的3位自然数?可以组成多少个没有重复数字的3位偶数? 从0,1,2,3,4,5,6,7,8,9这10个数字中选出5个不同的数字组成一个五位数,使它能被3,5,7,13整除,这个数最大是多少? 1 2 3 4 5 6 7 8 9 0能组成哪些11个数字用数字1、2、3、4、5、6能组成多少个三位偶数? 1,2,3,4,5,6,7,8,9,0,这10个数字不重复使用能组成多少个数字用数字0,1,2,3,4,5组成没有重复数字的数能组成多少个自然数用数字0,1,2,3,4,5组成没有重复数字的数.能组成多少个正整数? 从0、1、2、3、4、5、6、7、8、9这十个数字中,选9个数字,组成一个两位数、一个三位数和一个四位