题库 高中信息

题干

《孙子算经》中有一个“物不知其数”的问题,某数以3除余2,以5除余3,以7 除余 2。下面的 VB 程序用于求 1000 以内满足该条件的自然数及个数,请在程序划线处应填入合适的表达式。
Private Sub Command1_Click() Dim c As Integer, n As Integer c = 0 : n = 9
Do While n <= 1000
If n Mod 3 = 2 And n Mod 5 = 3 Then
List1.AddItem Str(n)
c = _____________
End If
n = _____________
Loop
Label1.Caption = "1000 以内满足条件的数有" & Str(c)& "个"
End Sub
上一题 下一题 0.99难度 填空题 更新时间:2019-05-22 10:14:47

答案(点此获取答案解析)