主观

下列程序的功能是:输出10到100之间的所有回文素数。所谓回文素数是指,如果一个数是素数,则该数反序后形成的数也是素数。例如,13是素数,13反序形成得到数为31,31也是素数,则称13为回文素数。请在程序的横线处填写适当的语句,使程序完成指定的功能。 

 Private Sub Command12_Click () 

 Dim k As Integer, m As Integer, n As Integer 

 For k = 10 To 100 

 If prim (k) Then 

 m= _____【12】_____ 

 n = 0 

 Do While m>0 

 n = n * 10 + m mod 10 

 m=m\10 

 Loop 

 If prim (n) Then 

 MsgBoxk & "," & n 

 End If 

 End If 

 Next k 

 End Sub 

 Public Function prim (n As Integer) As Boolean 

 Dim j As Integer 

 For j = 2 To n /2 

 If n Mod j = 0 Then 

 prim = _____【13】_____ 

 Exit Function 

 End If 

 Next j 

 prim = True 

 Exit Function 

 End Function

参考答案
您可能感兴趣的试题
¥

订单号:

遇到问题请联系在线客服

订单号:

遇到问题请联系在线客服