5,6章作业答案.doc

1.求满足：abcd=(ab)*(ab)+(cd)*(cd)的所有四位数abcd：/* 分解4位数1 */main() int i,n1,n2; for(i=1000;i=9999;i+) n1=i/100; n2=i%100; if(n1*n1+n2*n2=i) printf(n%d,i); /* 分解4位数2 */main() int i,j,n1,n2; clrscr(); for(i=10;i=99;i+) for(j=00;j=99;j+) if(i*100+j=i*i+j*j) printf(n%d,i*100+j); 2.求10999间的同构数。“同构数”是指一个数的右端若干位的平方等于该数本身。 如25=52，625=252，所以，25和625均是同构数/* 同构数 */main() int i; clrscr(); for(i=10;i=999;i+) if(i%10*(i%10)=i | i%100*(i%100)=i) printf(%4dt,i);3.输出ASCII表的第001122符号，每行只能输出10个符号 /* 输出ASCII表1 */main() int i;clrscr(); for(i=1;i=122;i+) printf(%3d %c ,i,i); if(i%10=0) printf(n); /* 输出ASCII表2 */main() int i,j=0; clrscr(); for(i=1;i=0 & c=A&c=a&c=10) break; printf(Total %d ttRight %d Wrong %d Score%-3.0fn,m, n, m-n,(float)n/m*100);8.给出一个由键盘输入的数的所有因子main() int num,i=1; printf(Please input a number:); scanf(%d,&num); do if(!(num%i) printf(%4d=%4d*%4dn,num,i,num/i); i+; while(i=num/2); /* why */2.求3000以内的所有亲密数/* 求亲密数 */main() int a,i,m,n; clrscr(); printf(The friendly number are:n); for(a=1;a=3000;a+) for(m=0,i=1;i=a/2;i+) if(a%i=0) m+=i; for(n=0,i=1;i=m/2;i+) if(m%i=0) n+=i; if(n=a&am) printf(%4d%4dn,a,m); n8. 2/6 = 1/12 + 1/22 + 1/32 + 求，要求最后一项小于10- 6#include main() long i=1; double pi=0,t=1.0/(1*1); while(t=1e-6) pi += t; i+; t=1.0/(i*i); pi=sqrt(6.0*pi); printf(PI=%10.8fn,pi);7. 编写程序打印所有符合下列条件的3位正整数：是某个数的平方，其中有两个数字相同，如100，121等/#include math.hmain() int i,a,n1,n2,n3; clrscr(); for(a=10;a=100;a+) for(i=100;i=999;i+) n1=i/100; n2=i%100/10; n3=i%100%10 ; if(a*a= =i)&(n1= =n2|n1= =n3|n2= =n3) printf(n%d,i); /* 求符合条件的三位数2 */main() int i,n1,n2,n3,n4,c; clrscr(); for(i=100;i=999;i+) n1=i/100;n2=i%100;n3=n2/10;n4=n2%10; if(n1=n3|n3=n4|n1=n4) for(c=0;c*c=i;c+) if(c*c=i) printf(%4d,i); /* 求符合条件的三位数3 */main() int i,k,a,b,c; for(i=10;i32;i+) k=i*i; a=k/100; b=(k%100)/10; c=k%10; if(a-b)*(b-c)*(c-a)= =0) printf(%-6d,k); printf(n);1 .三色球问题：若一个口袋中放有12个球，其中有3个红的，3个白的和6个黑的，问从中任取8个共有多少种不同的组合？并显示具体的颜色搭配。其中8球中至少有一个为白球。/* 取球1 */main() int a,b,c,k=0,n; clrscr(); for(a=1;a=3;a+) for(b=0;b=3;b+) for(c=0;c=6;c+) if(a+b+c=8) printf(n%d,%d,%d, a,b,c); k+; printf(n%d,k);/* 取球2 */main() int a,b,k=0,n; clrscr(); for(a=1;a=3;a+) for(b=0;b=3;b+) if(8-a-b=6) printf(n%d,%d,%d,a,b,8-a-b); k+; printf(n%d,k);nn3.一个正整数，分别被3,5,7除，余数为k,m,n，求此数/* kmn */main() int i,k,m,n; printf(input:); scanf(%d%d%d,&k,&m,&n); i=0; while(!(i%3=k&i%5=m&i%7=n) i+; printf(%d,i);n5.已知求正弦函数sin(x)近似值的多项式公式为：sin(x)=x-x3/3!+ x5/5!- x7/7!+ .(-1)n (2n+1)/(2n+1)!+. 要求输入x（x为小数形式的pi/n），按上述公式计算sin(x)的近似值，直到最后一项的绝对值小于10-51. 输入double型数据，一定要用%lf形式2. 不同变量表示不同含义，多设置几个变量，避免一个变量多个用途3. 为了防止数据溢出出错，数据类型定义得大一点，如整形数定义为long,实数定义为double#include main() long i=1,flag=1; float x,t=0,sin=0,p,q=1; clrscr(); printf(Please input x:); scanf(%f,&x); t=x; p=x; printf(n%f,t); while(fabs(t)=1e-6) sin += t; i=i+2; flag=-flag; p=p*x*x; q=q*(i)*(i-1); printf(p=%10.2f q=%10.2,p,q); t=(double)p/q*flag; printf(n%f,t); printf(nsin=%10.8fn,sin);n6.输入num,输出高和上底均为num、如下所示的等腰梯形，设num=5时： * 5 * 7 * 9 * 11 * 13/* 输出梯形 */main() int num,i,j; clrscr(); printf(Please input number:); scanf(%d,&num); for(i=1;i=num;i+) for(j=0;j=num-i;j+) printf( ); for(j=1;j=2*i-1+num-1;j+) printf(*); printf(n); 8.用梯形法求 f(x)=x2-x+1的定积分。设积分的上下界为 b =10， a = 1，积分区间分割数n = 200。main() int i; double s=0,h,