所有两位绝对质数之和(用VF)

来源：百度知道 编辑：UC知道 时间：2024/06/19 19:06:18
一个自然数是质数，且它的数字位置经过任意对换后仍为质数，则称为绝对质数，例如13就是一个绝对质数。试求所有两位绝对质数之和(最好用两种方法)
最好用两种方法,其中一种就使用过程处理。令外一种随便

经过我用VF亲自检验过了的
clear
sum=0
for i=10 to 99
for j=2 to i-1
if i%j=0
exit
endif
endfor
if j>=i
a=int(i/10)
b=i%10
x=b*10+a
for y=2 to x-1
if x%y=0
exit
endif
endfor
if y>=x
?alltrim(str(i)),"是个素数",alltrim(str(x)),"也是素数"
sum=sum+i
endif
endif
endfor
?"求和结果是",sum

clear
s=1
for i=10 to 99
N=int(sqrt(i))
for j=2 to n
if i%j=0 && I%j中%为求余数
exit
endif
endfor
*是质数，则上个循环中I%J不可能是0，退出上个循环后j=N+1
if j>n
s=s+i
endif
endfor
?'s=',s

经管的考试题目？