回文素数

01./*       
02.* 程序的版权和版本声明部分       
03.* Copyright (c)2012, 烟台大学计算机学院       
04.* All rightsreserved.       
05.* 文件名称:xx.cpp                                  
06.  
07.* 作    者:刘卫丽                                 
08. 
09.* 完成日期:2012年11月27日       
10.* 版 本 号: v1.0             
11.* 输入描述:无       
12.* 问题描述:利用自定义函数,for语句,循环组合计算100以内所有的回文数、素数、可逆素数      
13.* 程序输出:100以内所有的回文数、素数、可逆素数     
14.* 问题分析:略      
15.*/              
#include <iostream>   
using namespace std;  
bool isprime(int);   //素数   
bool ispalindrome(int);  //回文数   
int reversenum(int);  //逆素数   
int main()  
{  
   int i;  
    cout<<"1.输入100以内的所有素数"<<endl;  
    for(i=2;i<100;++i)  
    {  
        if(isprime(i))  
            cout<<i<<'\t';  
   }  
    cout<<endl;  
    cout<<"2.输入100以内的所有回文数"<<endl;  
    for(i=2;i<100;++i)  
    {          if(ispalindrome(i))  
            cout<<i<<'\t';  
    }  
    cout<<endl;  
    cout<<"3.输入100以内的所有回文素数"<<endl;  
    for(i=2;i<100;++i)  
    {  
        if(ispalindrome(i) && isprime(i))  
            cout<<i<<'\t';  
    }  
    cout<<endl;  
    cout<<"4.输入100以内的所有可逆素数"<<endl;  
    for(i=2;i<100;++i)  
    {  
        if(isprime(i)&&isprime(reversenum(i)))  
            cout<<i<<'\t';  
    }  
    return 0;  
}  
  
  
#include <cmath>   
bool isprime(int n)  
{  
    bool prime=true;  
    int k=int(sqrt(n)),i;  
    for(i=2;i<=k;i++)  
    {  
        if(n%i==0)  
        {  
            prime=false;  
            break;         }  
    }  
    return prime;  
}    
bool ispalindrome(int n)   
{  
bool palindrome=false;  
int m,k;  
m=n;  
k=0;  
while(m>0)  
{  
    k=k*10+m%10;  
    m=m/10;  
}  
if(k==n)  
    palindrome=true;  
return palindrome;  
}  
  
int reversenum(int n)  
{  
    int k;  
    k=0;  
    while(n>0)  
    {  
        k=k*10+n%10;  
        n=n/10;  
    }  
    return k;  
}  

本数据集来源于 2024 年 7 月在江西省中东部余干县、贵溪市、金溪县丘陵林地采集的千枚岩、红砂岩、花岗岩母质发育红壤关键带剖面土壤实测数据,空间覆盖 3 个县域不同岩性风化壳林地,采样点位经纬度分别为千枚岩剖面 P10(116.8316°E,28.5269°N)、红砂岩剖面 P08(117.1048°E,28.3492°N)、花岗岩剖面 P04(116.6883°E,27.9963°N);垂直空间采样深度存在差异,千枚岩与花岗岩剖面采样深度 0~600 cm,红砂岩剖面采样深度 0~450 cm,垂直分层采样分辨率为 0~50 cm 区间分 0~20 cm、20~50 cm 两层,50 cm 以下土层以 50 cm 为固定间隔分层,整套数据集共包含 36 条土壤剖面分层记录,其中 P10 千枚岩剖面 13 条、P08 红砂岩剖面 11 条、P04 花岗岩剖面 13 条。数据采集时间为 2024 年 7 月,实验室理化指标、矿物测试、酸碱滴定及统计建模工作于 2024 年 7 月 —2026 年 5 月完成,无时间序列连续监测数据,仅为单次野外剖面采样静态数据集。 数据集包含野外剖面基础信息、土壤酸碱滴定原始数据、土壤酸度指标、交换性盐基与交换性酸、土壤机械组成、有机质、黏土与原生矿物半定量 XRD 数据、无定形 / 晶形铁铝氧化物含量。全量理化指标计量单位统一规范:酸缓冲容量 pHBC 单位为 cmol・kg⁻¹・pH⁻¹,交换性酸、交换性盐基离子单位为 cmol・kg⁻¹,矿物以质量百分比(%)表示,、黏粒 / 粉粒 / 砂粒、有机质、铁铝氧化物单位均为g/kg,pH 为无量纲数值。 覆盖范围: 中位纬度: 28.2616 中位经度: 116.89654999999999 南界纬度: 27.9963 西界经度: 116.6883 北界纬度: 28.5269 东界经
评论 1
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值