西工大C語(yǔ)言程序作業(yè)

1、T021、羊羊聚會(huì)#include #include double f(double a,double b)double i;for(i=1;i+)if(i*b=a)return i;break;if(i*ba)return (i-1);break;int main()double x,y,a,b,c,t,m,n,k;scanf(%lf %lf %lf %lf %lf, &x,&y,&a,&b, &c); if(ba)m=b-a,n=y-x;elsem=a-b ,n=x-y;if(n0)for(t=0;t+)k=t*m-(c- n);if(k=0)printf(%.OIf,t);break;i

2、f(k0&(k-f(k,c)*c)=0)printf(lmpossible);break;if(m0&(k-f(k,c)*c)=n)printf(lmpossible); break;return 0;T022、粒子裂變(1)#include #include int main() int t,i,a=1,b=0;scanf(%d, &t);for(i=1;iv=t;i+)b=3*a+2*b;a=(b+(pow( -1,i)*3)/3;printf(%d %d,a,b);(2)#includeint main()int n100,m100,t,i;n0=1;/n100數(shù)組存儲(chǔ)a粒子的數(shù)目初始值

3、為 0m0=0;/m100數(shù)組存儲(chǔ)B粒子的數(shù)目，初始值為 1scanf(%d, &t);for(i=1;iv=t;i+)ni=mi-1;mi=3*ni-1+2*mi-1;printf(%d %d,nt,mt);getchar();getchar();/多讀取一個(gè)回車可以看到輸出結(jié)果，直到 輸出回車后結(jié)果才閃過(guò)T023、探索合數(shù)世紀(jì)#include#includeint main()int n,s,i=0,j=0,w,h,k,u=1;scanf(%d,&n);for(i=1;iv=n;i+)for(k=u;k+)for(s=k*100,h=1;s=k*100+99;s+)for(j=2,w=1;

4、jv=sqrt(s);j+)w=s%j;if(w=0)break;if(w!=0) h=0;break;if(h=1)u=k;break;printf(%d %dn,u*100,u*100+99);return 0;T024、排列 19#include#includeint main()int i,j,k;int a10,d,fg,n=0,t,m=0;for(i=123;iv=987/3;i+)j=2*i;k=3*i;a0=i/100;a1=i/10%10;a2=i%10;a3=j/100;a4=j/10%10;a5=j%10;a6=k/100;a7=k/10%10;a8=k%10;for(d

5、=0;d8;d+)for(fg=d+1;fg9;fg+)if(ad=afg)n+;if(n=0)for(t=0;t9;t+)if(at=0)m=1;if(m!=1)printf(%d %d %dn,i,j,k);elsem=0;elsen=0;printf(%fn,(double)clock()/CLOCKS_PER_SEC);return 0;T025、幸運(yùn)數(shù)字7#include int main()5fiNscanf(=%d=QON=fo(一 丄二 ah n二+)宀if(i%7HH 0) pinff(=%2n=三 e-se宀in二 emp Hr whi-e (CDmp Vo) 宀if (C

6、Dmp % 10 HH 7)pinff(=%2n=三break 八CDmp HCDmp 二 0T026, 1saa#inc-udecss:iohvint SubSum(int);int Pow(int a,int x);int TotalSum(int n);int NumLen(int n);int main()int n;scanf(%d,&n);printf(%dn,TotalSum(n);return 0;int NumLen(int n)int s=0;dos+=1;n/=10;while(n);return s;int SubSum(int n)int m=NumLen(n);in

7、t firstnum=n/Pow(10,m-1);if(firstnum=1)return (m-1)*Pow(10,m-2)+1);else if(firstnum=2)return(SubSum(Pow(10,m-1)+Pow(10,m-1)+(m-1)*Pow(10,m-2)-1)；elsereturn(SubSum(firstnum-1)*Pow(10,m-1)+(m-1)*Pow(10,m-2);int Pow(int a,int x)int a2=a,i;if(x=0) return 1;for(i=1;ix;i+)a*=a2;return a;int TotalSum(int n

8、)int totalsum=0;int len=NumLen(n);int firstnum=n/Pow(10,len-1);if(len=1 & n)return 1;if(len=1 & !n)return 0;if(firstnum=1)totalsum+=(SubSum(Pow(10,len-1)+n%Pow(10,len-1); elsetotalsum+=SubSum(firstnum*Pow(10,len-1); n%=Pow(10,len-1);return (totalsum+TotalSum(n);T027、分?jǐn)?shù)拆分#include int main()int k,x,y;

9、scanf(%d,&k);for(x=(k+1);x=2*k;x+)y=(k*x)/(x-k);if(k*x)%(x-k)=0)y=(k*x)/(x-k);printf(1/%d=1/%d+1/%dn,k,y,x);T028、解不等式#include int main()int k,x,y;scanf(%d,&k);for(x=(k+1);x=2*k;x+)y=(k*x)/(x-k);if(k*x)%(x-k)=0)y=(k*x)/(x-k);printf(1/%d=1/%d+1/%dn,k,y,x);T029、除法 09,aj#includeint main()int p,n,m,i,j,a

10、10,jud;scanf(%d,&p);讀入要測(cè)試的數(shù)n=1234;for(;nv=98765;n+)/n 窮舉到最大的 98765jud=0;m=n; / 不能破壞循環(huán)變量n的值for(i=4;i=0;i-)ai=m%10;m=m/10;/將n的5位數(shù)字分別存在數(shù)組中if(n%p!=O)continue;/ 如果n不能被p整除，則跳到下個(gè)循環(huán)elsem=n/p; /分母需要重新賦值，不能與分子相同for(i=9;i=5;i-)ai=m%10;組中m=m/10;/若能整除，則把 5個(gè)數(shù)字分別存在數(shù)for(i=0;iv=8;i+)for(j=i+1;jv=9;j+)if(ai=aj)jud=1;

11、break;/ 判斷a0卜a9中有無(wú)重復(fù)數(shù)字if(jud=1)break;/若有重復(fù)數(shù)字，則跳出循環(huán)if(jud=0)/若沒(méi)有重復(fù)數(shù)字，則輸出這組數(shù)據(jù)for(i=0;iv=4;i+)printf(%d,ai);printf(/);for(i=5;i=9;i+)printf(%d,ai); printf(=%dn,p);return 0;T030、分?jǐn)?shù)化小數(shù)#includeint main()int p,n,m,i,j,a10,jud;scanf(%d,&p);讀入要測(cè)試的數(shù)98765n=1234;for(;nv=98765;n+)/n窮舉到最大的jud=0;m=n; /不能破壞循環(huán)變量n的值for(i=4;i=0;i-)break;/ 判斷a0卜a9中有無(wú)重復(fù)數(shù)字ai=m%10;m=m/10;將n的5位數(shù)字分別存在數(shù)組中if(n%p!=O)continue;/ 如果n不能被p整除，則跳到下個(gè)循環(huán)elsem=n/p; /分母需要重新賦值，不能與分子相同for(i=9;i=5;i-)ai=m%10;組中m=m/10;/若能整除，則把 5個(gè)數(shù)字分別存在數(shù)for(i=0;iv=