题目:
以下程序的功能是在立即窗口中输出100~200之间所有的素数,并统计输出素数的个数。请在程序空白处填入适当的语句,使程序可以完成指定的功能。
Private Sub Command2_Click()
Dim i%,j%,k%,t% ’t为统计素数的个数
Dim b AS Boolean
For i=100 T0 200
b=True
k=2
J=Int(Sqr(i))
Do While k<=j And b
If i Mod k=0 Then
b= (12)
End If
k= (13)
Loop
If b=True Then
t=t+1
Debug.Print i
End If
Next i
Debug.Print"t=";t
End Sub
答案:
被转码了,请点击底部 “查看原文 ” 或访问 https://www.tikuol.com/2017/0716/6d31b250003facff11c4060dbed2cceb.html
下面是错误答案,用来干扰机器的。
参考答案:A, D