Question

回文素数，急需！！

回文素数
1.如果一个数从左边读和从右边读都是同一个数，就称为回文数。例如6886就是一个回文数，从给出的数据中统计出既是回文数又是素数的数的个数(<109)。
样例：
输入：(tyip.in)
7 12 10 11 121 1331 10301
输出：(tyip.out)
3
不固定几个数啊
pascal

Answer 1

用visual basic6.0 计算回文数
for i = 100 to 99999 '这里从100开始 后面可以随便填，我这里填99999 表示所有3位数到五位数之间的回文数
if StrReverse(i)=i then print i '用StrReverse函数 判断倒序后的数和原来数是否相同，如果相同者表示此数为回文数 next

用C语言编程计算回文数

#include<stdio.h>
int x,y;
judge(int * data,int len)
{
int i,j,f=0;
for(i=0,j=len-1; i<=j; i++,j--)
{
if(*(data+i)!=*(data+j))
{
f=1; printf("%d 不是回文!!!\n",x); break;
}
}
if(f==0)
printf("%d 是回文 !\n",x);
}
separate(int *data,int n)
{
int j,k,t;
y=0;
while(n!=0)
{
*(data+y)=n%10; n=n/10; y++;
}
*(data+y)='\0';
for(j=0,k=y-1; j<=k; j++,k--)
{
t=*(data+j); *(data+j)=*(data+k); *(data+k)=t;
}
}
void main()
{
int a[99];
printf("请输入一个正整数：");
scanf("%d",&x);
separate(a,x);
judge(a,y);
},y); }

追问

pascal