下列程序的功能是:输出10到100之间的所有回文素数。所谓回文素数是指,如果

下列程序的功能是:输出10到100之间的所有回文素数。所谓回文素数是指,如果一个数是素数,则该数反序后形成的数也是素数。例如,13是素数,13反序形成得到数为31,31也是素数,则称13为回文素数。 Private Sub Command1 2_Click(  ) Dim k As Integer,m As Integer,n AsIntegerFor k=10 T0 100If prim(k)T

问题:

[单选] 下列程序的功能是:输出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

参考解析:

素数是只能被1和它本身整除的数,因此本题第二空填写False。click函数主要有两个功能,一个是返序,另一个是判断是不是回文素数。在for循环中判断k是不是回文素数,rn是代表即将判断的数字,也就是k。

联系我们

联系我们

查看联系方式

邮箱: 2643773075@qq.com

工作时间:周一至周五,9:00-17:30,节假日休息

关注微信
微信扫一扫关注我们

微信扫一扫关注我们

返回顶部