填空题

下列程序的功能是求出所有的1-100之间的孪生素数。孪生素数是指两个素数的差为 2,如3和5,11和13等,请填空。 Private Sub Form_Click() Dim i As Integer For i = 3 To 97 Step 2 If 【9】 Then Print i, i + 2 End If Next i End Sub Public Funtion Prime (ByVal n As Integer) As Boolean Dim i as Integer For i = 2 To n - 1 If 【10】 Then Exit For End If Next i If i = n Then Prime = True Else Prime = False End If End Function

【参考答案】

Prime(i)And Prime(i+2) n Mod i=0