作业帮自然数?分别除以2,3,4,5,6,7,8,9,余数分别是1,2,1,4,5,0,1,2
来源：学生作业帮助网 编辑：作业帮 时间：2024/04/29 12:13:25
自然数?分别除以2,3,4,5,6,7,8,9,余数分别是1,2,1,4,5,0,1,2
自然数?分别除以2,3,4,5,6,7,8,9,余数分别是1,2,1,4,5,0,1,2
自然数?分别除以2,3,4,5,6,7,8,9,余数分别是1,2,1,4,5,0,1,2
2009.
2009/2=1004 余 1.
2009/3=669 余 2.
2009/4=502 余 1.
2009/5=401 余 4.
2009/6=334 余 5.
2009/7=287 余 0.
2009/8=251 余 1.
2009/9=223 余 2.
2009
除以2、4、8余数是1，则只用看除以8的余数是1了
除以3、9的余数是2，则只用看除以9的余数是2了
另外还有除以5的余数是4，除以6的余数是5，还是7的倍数。
这样，我们就可以发现增加7后是6、7、8、9的公倍数，
6、7、8、9的最小公倍数是504，504-7=497，
则这个数是504的倍数多497
这时再考虑除以5余数4，这样可以知道这个数的...
全部展开
除以2、4、8余数是1，则只用看除以8的余数是1了
除以3、9的余数是2，则只用看除以9的余数是2了
另外还有除以5的余数是4，除以6的余数是5，还是7的倍数。
这样，我们就可以发现增加7后是6、7、8、9的公倍数，
6、7、8、9的最小公倍数是504，504-7=497，
则这个数是504的倍数多497
这时再考虑除以5余数4，这样可以知道这个数的个位数字是4或9
因为504×3+497=2009的个位数字是9，满足条件
因此这个数最小是2009
收起
此自然数太多了，给出VB编的计算程序：
Option Explicit
Dim i As Long
Private Sub Command1_Click()
i = 14610
Do
If i Mod 2 = 1 And i Mod 3 = 2 And i Mod 4 = 1 And i Mod 5 = 4 And i Mod 6 = 5 And i...
全部展开
此自然数太多了，给出VB编的计算程序：
Option Explicit
Dim i As Long
Private Sub Command1_Click()
i = 14610
Do
If i Mod 2 = 1 And i Mod 3 = 2 And i Mod 4 = 1 And i Mod 5 = 4 And i Mod 6 = 5 And i Mod 7 = 0 And i Mod 8 = 1 And i Mod 9 = 2 Then
Text1.Text = i
Exit Do
End If
i = i + 1
Loop
End Sub
给出几个自然数：2009、4529、7049、9569、12089、14609、17129、……
收起
除以2、4、8余数是1，则只用看除以8的余数是1了
除以3、9的余数是2，则只用看除以9的余数是2了
另外还有除以5的余数是4，除以6的余数是5，还是7的倍数。
这样，我们就可以发现增加7后是6、7、8、9的公倍数，
6、7、8、9的最小公倍数是504，504-7=497，
则这个数是504的倍数多497
这时再考虑除以5余数4，这样可以知道这个数的...
全部展开
除以2、4、8余数是1，则只用看除以8的余数是1了
除以3、9的余数是2，则只用看除以9的余数是2了
另外还有除以5的余数是4，除以6的余数是5，还是7的倍数。
这样，我们就可以发现增加7后是6、7、8、9的公倍数，
6、7、8、9的最小公倍数是504，504-7=497，
则这个数是504的倍数多497
这时再考虑除以5余数4，这样可以知道这个数的个位数字是4或9,再加上除2余1,可知这个数是奇数,个位不能是偶数,就只剩下个位是9的数了,
因为504×3+497=2009的个位数字是9，满足条件
因此这个数最小是2009
收起