CC语言课程设计Word文档格式.docx

1、3/*100-400内的水仙花数的个数*/=400;4, /* 0-60内每位数的乘积大于和的数个数*/ int a,b,c,d,e,i=0; for（a=0;=6; b=a/10;c=a%10; d=a*b; e=a+b; if（d=e ）5/*满足1/A2+1/B2=1/C2关系时，称为倒勾股数 */ int a,b,c ,t=0; float x,y,z; for（a=1;=100; for（b=1;bb+） for（c=1;cc+） x=1/（a*a）; y=1/（b*b）; z=1/（c*c）; if（x+y=z&a+b+c130&ab&c&bc）6, /*爱因斯坦走台阶 */ in

2、t s ; for（s=0; ;s+） if（s%2=1&s%3=2&s/4=3&s/5=4&s/6=5&s%7=0 ） break;,s）;7. /*121-140内弦数的个数*/ int a=0,b=0,c=121 ,i=0; for（c=121;=140;=15; for（b=0; if（c*c=a*a+b*b） continue;8/*1000内其十位数是6能被8整除数的个数*/ int a,i=0; for（a=10;=1000; if（a%100/10=6&a%8=0）9/* 0-60内每位数的乘积大于和的数个数*/=60; d=c*b; e=c+b; if（de ）10. /*

3、1-5000内能被5整除偶数之和大于500和的值*/ int a, b=0; for（a=2;=5000;a+=2） if（a%5=0） b=b+a; while（ b500 ）;,b）;11. /* 100-500内能被3整除余2和能被5整除余3的个数*/=500; if（a%3=2&a%5=3） b+;12/* 1-7000内能被3或者能被7整除的个数*/=7000; if（a%3=0|a%7=0）13. /*3-100内非偶数非素数之和*/math.h int a,i,k, b=0; for（a=3 ; k=sqrt（a）; for（i=2;ik+1）14/*求满足ijk+kji=153

4、4,且ik,解的组数 */ int j,i,k, b=0; for（j=0 ;j=9;j+） for（k=0 ;kk+） for（i=0 ;k; if（ 100*i+10*j+k+100*k+10*j+i=1534）15/*有四位数ABCD的个数，该四位数是11的倍数，且A=B+C，即第2位数加上第3位数等于第1位数。 4 */ int j,i,k,a, b=0; for（j=1000;=9999; i= j/1000; k=j%1000/100; a=j%100/10; if（j%11=0&i=k+a）16/*求三位数的偶数中，所有各位数字之和是15的倍数的数的个数*/ int j,i,k,

5、a,s, b=0; for（j=100;j+=2 ） i= j/100 ; k=j%100 /10 ; a=j%10 ; s=i+k+a; if（s%15=0 ）17/*四位数的奇数中，所有各位数字之积是125的倍数的数的和*/ int j,i,k,a,c,s, b=0; for（j=1111; i= j/1000 ; k=j%1000 /100 ; c=j%10; s=i*k*a*c; if（s%125=0 ） b=b+j;18/*5000以内能被17或者23整除的正整数的个数 */ for（j=1;j+ ） if（j%17=0|j%23=0 ）19/*四位数的偶数中，所有各位数字之和是30

6、的倍数的数的和 */ i=j/1000; c=j/10; s=i+k+a+c; if（s%30=0 ）21/*统计10009999之间的所有满足以下条件的四位数的个数。该数是一个完全平方数*/ int a,b,c ,d,s,x,y,t=0; for（s=1000;s9000） break; s=s-j;23/*S=2+4+8+16+32+，求S不大于1500的最大值*/ for（j=2;j=2*j ）1500） break;25 /*m的值为50时，计算下列公式的值T=1-1/2-1/3-1/4-1/m*/ #include main（） float n,m,s,T; s=0; for（n=2

7、;n10000000）;%ldn%ld,f1,f2）;28/*计算y=1+2/3+3/5+4/7+.+n/（2*n-1）的值，n=50*/ float y=0,m,s; int t,n; t=2*n-1; m=1.0/t; s=m*n; y+=s;%.2f,y）;29/*计算y=x/1!-x3/3!+x5/5!-x7/7!.前20项的值x=2*/ float y=0,m,s,x;=20; x=-4*x; m=2*n+1; t=t*m*（m-1）; s+= x/t;30/*梅森尼数2n-1是素数，【2-21】内的梅森尼数个数 */ int n,m,i,j,k,x=0;=21; m=2*m; i=

8、m-1; k=sqrt（i）; for （j=3; if （i%k=0） break; if （j=k+1） x+;,x）;31/*两位数分子分母各个数之和的比等于原来的值*/ int n,m,a,b,c,d,s; float x,y; for（n=10;=98; for（m=11;mn&x=y ） s+=a+b+c+d;32/* 1-50内构成直角三角形的组数 */ int x,y,z,n=0,t; for（x=1; for（y=1; for（z=1; if（x+yx*x+y*y=z*z） n+; t=n/3;%d 33/*一正整数递减，每次减半后减一，10次后剩一 */ int n, s=

9、0,m=1;=10; m= 2*（m+1）; %dn,m）;34. /* 2/1,3/2,5/3,.前50项和*/ int x1=1,x2=2, n ; float t,s=0; t=x2/x1; s+=t; x2=x1+x2; x1=x2;%.2f 35，/*求五位数各个位数平方和为100的最大五位数*/ int x,a,b,c,d,e,m,n,max; for（x=10000;=99999; a=x/10000; b=x%10000/1000; c=x%1000/100; d=x%100/10; e=x%10; m=a*a+b*b+c*c+d*d+e*e; if（m=100） break;

10、 max=x; for（n=x; a=n/10000; b=n%10000/1000; c=n%1000/100; d=n%100/10; e=n%10; if（m=100） max=n;%ld ,max）;36，#include long int y,k; int x,i=0; for（x=2; y=x*x; k=y-x; if（x=10&=99&k%100=0）=100&=999&k%1000=0） if（x=1000&k%10000）37/*求50-150之间的友对数*/ int x,y,z, i,t=0; for（x=50;=150; y=x+1; z=x*y-1;=z-1; if （

11、z%i=0） break; if（z%i!=0） if （i=z-1）38/* 求1，30000之内E数的个数,E（1）=E（2）=1;E（n）=（n-1）*E（n-1）+（n-2）*E（n-2）*/ int i,j=2,n; long int a=0,1,1; for（n=3; an=（n-1）*an-1+（n-2）*an-2; for（i=1;=30000; if（an=i） j+;break; if（an=30000） break;,j）;39. /*试求所有两位绝对素数的和,绝对素数是交换位子后仍为素数*/ int i,j,a,b,x,k,s=0; for（i=11;i+=2）=i-1

12、; if（i%j=0） if（i%j! if（j=i-1） a=i/10; b=i%10; x=10*b+a; for（k=2;=x-1; if（x%k=0） if（x%k! if（k=x-1） s=s+i;40. /*f（0）=f（1）=1,f（2）=0f（n）=f（n-1）-2*f（n-2）+f（n-3）,（n2）求f（0）到f（50）中的最大值*/ long int a50=1,1,0,max; int i; for（i=3; max=a1; ai=ai-1-2*ai-2+ai-3; if（maxai） max=ai; else max=max;%ld41，/*f（n）=f（n-1）+2

13、*f（n-2）-5*f（n-3）,f（0）=1,f（1）=2,f（2）=3,求f（0）+f（1）+f（30）*/ long int a31=1,2,3,s=a0+a1+a2;=30; ai=ai-1+2*ai-2-5*ai-3; s=s+ai;42. /*A1=1, A2=1/（1+A1）, A3=1/（1+A2）, A4=1/（1+A3）, , 求A50*/ float a51=0,1; ai=1.0/（1+ai-1）;%.3f,a50）;43. /*A，B为正整数, AB, A*B=2698，且要求A+B取最小值，求满足上述条件的B值*/ int A,B,d,min=2699; long int c; for（B=2;B=2698;B+） for（A=1;Ad） min=d; for（A=1; min=A+B; c=A*B;,B）;44/*AB, A和B均为正整数，且A*B=2698，求A+B的最小值*/ p