作业帮 > 数学 > 作业

如果一个自然数是素数,且它的数字位置经过对换后仍为素数,则称为绝对素数,例如13.

来源:学生作业帮 编辑:搜搜考试网作业帮 分类:数学作业 时间:2024/05/06 16:20:07
如果一个自然数是素数,且它的数字位置经过对换后仍为素数,则称为绝对素数,例如13.
试求出所有二位绝对素数(一行一个绝对素数),结果就是输出所有的二位绝对素数.
shuru
11
13
17
31
37
71
73
79
97
请给正确的、现试验一下在发.
一定得自编的
如果正确加悬赏哟
如果一个自然数是素数,且它的数字位置经过对换后仍为素数,则称为绝对素数,例如13.
我用VBA写的,算不算?
Sub 全部2位绝对素数()
s = "shuru"
For I = 1 To 3 Step 2
For j = 1 To 9 Step 2
If 素数判断(10 * I + j) And 素数判断(10 * j + I) Then s = s & Chr(13) & IIf(I = j, I & j, I & j & Chr(13) & j & I)
Next j, I
MsgBox s
End Sub
Function 素数判断(I%) As Boolean
If I Mod 2 = 0 Then 素数判断 = False: Exit Function
For j = 3 To I / 2
If I Mod j = 0 Then 素数判断 = False: Exit Function
Next
素数判断 = True
End Function