c语言实验报告参考源代码.doc

c语言实验报告参考源代码.doc

ID:49924818

大小:161.00 KB

页数:25页

时间:2020-03-05

c语言实验报告参考源代码.doc_第1页
c语言实验报告参考源代码.doc_第2页
c语言实验报告参考源代码.doc_第3页
c语言实验报告参考源代码.doc_第4页
c语言实验报告参考源代码.doc_第5页
资源描述:

《c语言实验报告参考源代码.doc》由会员上传分享,免费在线阅读,更多相关内容在应用文档-天天文库

1、实验5三种基本结构的综合应用4.一个素数(设为p)依次从最高位去掉一位,二位,三位,……,若得到的各数仍都是素数(注:除1和它本身外,不能被其它整数整除的正整数称为素数,1不是素数,2是素数),且数p的各位数字均不为零,则称该数p为逆向超级素数。例如,617,17,7都是素数,因此617是逆向超级素数,尽管503,03,3都是素数,但它不是逆向超级素数,因为它包含有零。试求[100,999]之内的所有逆向超级素数的个数。#include"stdio.h"main(){inti,j,k,m,p,q,n=0;for(i=100;i<=999;i++){for(j=2;j

2、==0)break;if(j>=i)/*三位数是素数时*/{k=i%100;/*去掉百位数字*/if(k>=10)/*十位数字不是0时*/{for(m=2;m=k)/*两位数是素数时*/{p=i%10;/*p为个位数字*/for(q=2;q=p)n++;}}}}printf("%d",n);}Key:575.求[2,400]中相差为10的相邻素数对的对数。#include"stdio.h"main(){inti,j,k,m,p,q,n=0;for(i=2;i<=400;i++)

3、{for(j=2;j=i)/*i是素数时*/{for(k=i+1;k=k)break;}/*k是素数时终止if语句的外层循环*/if(k>=i+10)/*[i+1,i+9]不是素数时*/{for(q=2;q=k)/*i+10是素数时*/n++;}}}printf("%d",n);}Key:56.求[1,21]范围内的梅森尼数#include"

4、math.h"main(){longn,k=2,m,p,q;for(n=2;n<=21;n++){k=k*2;p=k-1;m=sqrt(p);for(q=2;q<=m;q++)if(p%q==0)break;if(q>m)printf("%5ld",n);}}Key:23571317197.求1000以内的亲密数对main(){inta,b,n,m,q,p;for(a=1;a<1000;a++){n=0;for(q=1;q<=a/2;q++)if(a%q==0)n+=q;for(b=a;b<=1000;b++){m=0;for(p=1;p<=b/2;p++)if(b%p==0)m+=p;if

5、(a==m&&b==n)printf("%5d%5d",a,b);}}}/*Key:662828220284496496*/实验6数组及其应用3.由N个有序整数组成的数列已放在一维数组中,下列给定程序中函数fun的功能是:利用折半查找法查找整数m在数组中的位置。若找到,返回其下标值;否则,返回-1。折半查找的基本算法是:每次查找前先确定数组中待查的范围low和high(lowhigh,查找结束。请

6、改正程序中的错误,使它能得出正确的结果。#include#defineN10main(){inti,a[N]={-3,4,7,9,13,45,67,89,100,180},k=-1,m;intlow=0,high=N-1,mid;printf("a数组中的数据如下:");for(i=0;i

7、/elseIf(m>a[mid])low=mid+1;/************found************/else{k=mid;continue;}}if(k>=0)printf("m=%d,index=%d",m,k);elseprintf("Notbefound!");}Key:第一个错误:elseIf(m>a[mid])应改为:elseif(m>a[mid])因C语言关键字必须小写。第

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。