单选

下列程序的功能是:输出10到100之间的所有回文素数。所谓回文素数是指,如果一个数是素数,则该数反序后形成的数也是素数。例如,13是素数,13反序形成得到数为31,31也是素数,则称13为回文素数。

Private Sub Command1 2_Click(  )

Dim k As Integer,m As Integer,n AsInteger

For k=10 T0 100

If prim(k)Then

m=__________

n=0

Do While m>0

N=n*10+Im Mod l0

M=m/10

Loop

If prim(n)Then

MsgBox k&“,”&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=__________

Exit Function

End If

Next j

prim=True

Exit Function

End Function

横线处应填写的内容是(  )。

  • A.k Fake
  • B.k True
  • C.m False
  • D.n True
参考答案
您可能感兴趣的试题

下列表达式计算结果为日期类型的是(  )。

  • A.#2012—1—23#一#2011—2—3#
  • B.year(#2011—2—3#)
  • C.DateValue(”2011—2—3”)
  • D.Len(“2011—2—3”)
¥

订单号:

遇到问题请联系在线客服

订单号:

遇到问题请联系在线客服