C语言 求1000以内的回文素数

来源:互联网 发布:黄药师软件视频 编辑:程序博客网 时间:2024/06/07 22:19
#include <stdio.h>
#include <stdlib.h>
 
int main()
{          
    inti,j,t,k,s;
    printf("Following are palindrome primes not greater than 1000:\n");
    for(i=0; i<=9;i++)
    {
        for(j=0;j<=9;j++)
        {
            for(k=0;k<=9;k++)
            {  
                s=i*100+j*10+k;
                t=k*100+j*10+i;
                if(i==0&&j==0)
                   t/=100;
                else    if(i==0)
                    t/=10;
            if(s>10&&s==t&&a(s))
                printf("%d\t",s);
                          }
        }
    }
}          
a(n)
{
    intn;
    inti;
    for(i=2;i<=(n-1)/2;i++)
    if(n%i==0)
        return(0);
    return(1);
}          

  

Following are palindrome primes not greater than 1000:11 101 131 151 181 191 313 353 373 383 727 757 787 797 919 929

1 0
原创粉丝点击