填空题

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

【参考答案】

[14] prime(i) And prime(i+2) [15]n Mod i=0