一个自然数是素数,且它的数字位置经过任意对换后仍为素数,则为绝对素数,求所有两位绝对素数之和(vf编程)

经过我用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
sum=0
for i=10 to 99
&&是从10开始判断 因为一位数不存在交换位置 而只到2位数（3位数以及以上的就没考虑）

for j=2 to i-1
if i%j=0
exit
endif
endfor

&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&
&&此部分是第一次判断是否为素数 也可以把 i%j=0 换成 int(i/j)=i/j 好好理解下
&& 如果还是不明白为什么可以这么判断的话 就背住吧
&& exit的作用是 如果判断不是素数的话就跳出此循环 这时 j的值只会小于i（为下面做准备）
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&