作业帮 > 综合 > 作业

编写一个程序:试用单重循环结构编程实现,求出10个“韩信点兵数”.该数除以3余2,除以5余3,除以7余4.

来源:学生作业帮 编辑:搜搜做题作业网作业帮 分类:综合作业 时间:2024/07/01 10:57:01
编写一个程序:试用单重循环结构编程实现,求出10个“韩信点兵数”.该数除以3余2,除以5余3,除以7余4.
各位帅哥帅姐,帮帮啦
编写一个程序:试用单重循环结构编程实现,求出10个“韩信点兵数”.该数除以3余2,除以5余3,除以7余4.
Private Sub Command1_Click()
js = 0:i = 0
Do
If (i Mod 3 = 2) And (i Mod 5 = 3) And (i Mod 7 = 4) Then js = js + 1:Print i
i = i + 1
Loop Until js > 10
End Su