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

来源：学生作业帮编辑：灵鹊做题网作业帮分类：数学作业时间：2024/04/29 17:07:12

如果一个自然数是素数,且它的数字位置经过对换后仍为素数,则称为绝对素数,例如13.试求出所有二位绝对素数
Program han3;
Var t,p,q,i,a,b,c,d:integer;
Begin
t:=0;p:=0;
for q:=1 to 9 do
for i:=1 to 9 do
begin
a:=q*10+i;
b:=i*10+q;
for c:=1 to trunc(sqrt(a)) do
if a mod c=0 then t:=1;
for d:=1 to trunc(sqrt(b)) do
if b mod d=0 then p:=1;
end;
if (t=0) and (p=0) then writeln(a,'':3,b);
Readln;
End.
这个是我自己写的.但是没有东西输出
请大家帮忙看看有什么问题
我承认我很笨,不要骂我
我改了,还是没反应、.

for c:=1 to trunc(sqrt(a)) do
if a mod c=0 then t:=1;
for d:=1 to trunc(sqrt(b)) do
if b mod d=0 then p:=1;
改为
for c:=2 to trunc(sqrt(a)) do
if a mod c=0 then t:=1;
for d:=2 to trunc(sqrt(b)) do
if b mod d=0 then p:=1;
再有一点
b就别输出了,要不就会输出两遍

如果一个自然数是素数,且它的数字位置经过对换后仍为素数,则称为绝对素数,例如13.试求出所有二位绝对素数一个素数,当它的数字位置对换以后仍为素数,这样的素数称为绝对素数.编写出一个程序,求出所有的绝对素数. matlab;求所有两位绝对素数 vbvbvbvbvb定义一个判断素数的函数过程,调用该函数过程求出所有的绝对素数一个两位素数,交换其各位与十位上的数字仍为素数,这样的数有几个设计一程序,求出5到100之间的所有素数,要求每行输出五个素数.判断一个整数是否是为素数用一个函数来实 pascal纯粹素数纯粹素数是这样定义的：一个素数,去掉最高位,剩下的数仍为素数,再去掉剩下的数的最高位,余下的数还是素 100以类的绝对素数 c++ 帮忙用C语言编程除1和它本身外,不能被其它整数整除的正整数称为素数（注：1不是素数,2是素数）.若两素数之差为2 ,则称编写程序输出100到10000以内的所有超级素数.所谓超级素数就是一个数本身是素数,从右依次去掉一位数字后所得的数还为素设计一个程序,求出200～1000之间的所有素数,要求每行输出5个素数.判断一个整数是否为素数用一个函数来实调用一个判别素数的函数,主函数中求出1~100之间的所有素数