12周任务：1000以内的回文素数

/*  
* 程序的版权和版本声明部分  
* Copyright (c)2012, 烟台大学计算机学院学生  
* All rightsreserved.  
* 文件名称： fun.cpp                             
* 作    者：李洋                              
* 完成日期：2012年11月18日  
* 版本号： v1.0        
* 对任务及求解方法的描述部分  
* 输入描述：10000内整数 
* 问题描述：求10000以内回文素数 
* 程序输出：10000以内回文素数  
*/
#include<iostream>   
#include<cmath>   
using namespace std;
bool prime(int m)    
{    
int k,i;        
    bool p=true;    
    k=int(sqrt(m));    
    for(i=2;i<=k;i++)    
    {    
        if(m%i==0)    
        {    
      p=false;    
      break;    
   }    
        
    }    
    return (p);    
}
bool palindrome(int m)    
{    
int k,n;        
    bool p=true;    
k=m;    
n=0;    
while (k>0)    
{    
    n=n*10+k%10;    
    k=k/10;    
}    
    if(m==n)    
    {    
        return  (p);    
    }    
    
}          
int main()  
{  
    int m;   
    for(m=3;m<=10000;++m)  
    {  
        if(prime(m)&&palindrome(m))  
        cout<<m<<" \t";  
    }
	cout<<endl;
    return 0;  
}