西工大c语言实验100题04Word格式文档下载.docx
- 文档编号:18643208
- 上传时间:2022-12-30
- 格式:DOCX
- 页数:20
- 大小:164.38KB
西工大c语言实验100题04Word格式文档下载.docx
《西工大c语言实验100题04Word格式文档下载.docx》由会员分享,可在线阅读,更多相关《西工大c语言实验100题04Word格式文档下载.docx(20页珍藏版)》请在冰豆网上搜索。
n;
for(j=0;
a[i][j]=0;
j=n/2,i=0;
for(k=0;
k<
n*n;
k++)
if(k==0)a[i][j]=1;
{i=i-1,j=j+1;
if(i<
0)i=n-1;
if(j>
n-1)j=0;
if(a[i][j]!
=0)
{i=i+2,j=j-1;
if(i>
n-1)i=i-n;
if(j<
0)j=n-1;
}
a[i][j]=k+1;
}
{if(i)printf("
for(j=0;
{if(j)printf("
"
%2d"
a[i][j]);
printf("
CH0709
inta[15]={1,4,9,13,21,34,55,89,144,233,377,570,671,703,812};
intb,top=14,bot=0,mid;
scanf("
b);
mid=(top+bot)/2;
while(b!
=a[mid]&
top>
=bot)
{if(b>
a[mid])bot=mid+1;
elsetop=mid-1;
if(b==a[mid])printf("
%d\n"
mid+1);
elseprintf("
nofound\n"
return0;
CH0714
chara[100],b[100],c,d;
inti;
gets(a);
gets(b);
a[i]==b[i]&
a[i]!
='
\0'
&
b[i]!
;
i++);
c=a[i],d=b[i];
i=c-d;
i);
T0701
inta[5][5]={1,0,0,0,0,2,1,0,0,0,3,2,1,0,0,4,3,2,1,0,5,4,3,2,1};
inti,j;
5;
%3d"
printf("
T0703
inta[10][10];
inti,j,n,m,s=0;
%d%d"
i,&
j);
for(n=0;
n<
i;
n++)
for(m=0;
m<
j;
m++)
scanf("
a[n][m]);
s=s+a[0][n];
i-1>
0&
n<
s=s+a[i-1][n];
for(n=1;
i-1;
{s=s+a[n][0];
s=s+a[n][j-1];
s);
T0704
chara[3][160];
inti,j,n1=0,n2=0,n3=0,n4=0,n5=0,n6=0;
gets(a[0]),gets(a[1]),gets(a[2]);
3;
a[i][j]!
{if(a[i][j]<
0)n1++,j++;
elseif(a[i][j]>
A'
a[i][j]<
Z'
)n2++;
a'
z'
)n3++;
elseif(a[i][j]>
0'
9'
)n4++;
elseif(a[i][j]=='
'
)n5++;
elsen6++;
中文=%d,大写=%d,小写=%d,数字=%d,空格=%d,其它=%d\n"
n1,n2,n3,n4,n5,n6);
T0706
chara[100][100]={'
};
charall[500];
inti=0,j=0,k=0,flag;
gets(all);
while
(1){
flag=0;
while(all[i]!
all[i]!
'
.'
){
a[j][k]=all[i];
a[j][k+1]='
k++;
i++;
flag=1;
if(all[i]=='
break;
if(flag){
j++;
i++;
k=0;
if(all[i-1]=='
||all[i-1]=='
j--;
for(;
j>
=0;
j--){
if(j)printf("
%s"
a[j]);
elseprintf("
%s"
T0709
inta[200],b[200],c[200]={0},i,j,k,n,m=0;
i);
scanf("
a[j]);
b[k]);
for(n=0;
if(a[k]==b[n])
{c[m]=a[k];
m++;
c[m]=0;
break;
}
if(c[0]==0)printf("
空集"
else
{for(i=0;
c[i]!
for(j=i;
c[j]!
if(c[i]>
c[j])k=c[i],c[i]=c[j],c[j]=k;
for(i=0;
if(i&
c[i]!
=c[i-1])printf("
c[i]);
elseif(i==0)printf("
T0716
string.h>
chara[300],b[300]={'
},t;
inti,j,k,n,m;
gets(a);
i=strlen(a);
strncpy(b,a,i/2);
if(i%2)n=i/2+1;
elsen=i/2;
m=n;
a[m]!
m++,j++)
a[j]=a[m];
for(j=n,k=0;
b[k]!
j++,k++)
a[j]=b[k];
i/2;
for(k=j;
if(a[j]>
a[k])t=a[j],a[j]=a[k],a[k]=t;
for(j=n;
a[j]!
for(k=j;
a[k]!
if(a[j]<
puts(a);
T0722
#include<
math.h>
inteejcb(doublea[][5],intn,doubleeps){
inti,j,p,q,l;
doublefm,cn,sn,omega,x,y,d;
l=1;
while
(1){
fm=0.0;
for(i=0;
i<
=n-1;
i++){
for(j=0;
j<
j++){
d=fabs(a[i][j]);
if((i!
=j)&
(d>
fm)){
fm=d;
p=i;
q=j;
if(fm<
eps)
return
(1);
x=-a[p][q];
y=(a[q][q]-a[p][p])/2.0;
omega=x/sqrt(x*x+y*y);
if(y<
0.0)
omega=-omega;
sn=1.0+sqrt(1.0-omega*omega);
sn=omega/sqrt(2.0*sn);
cn=sqrt(1.0-sn*sn);
fm=a[p][p];
a[p][p]=fm*cn*cn+a[q][q]*sn*sn+a[p][q]*omega;
a[q][q]=fm*sn*sn+a[q][q]*cn*cn-a[p][q]*omega;
a[p][q]=0.0;
a[q][p]=0.0;
if((j!
=p)&
(j!
=q)){
fm=a[p][j];
a[p][j]=fm*cn+a[q][j]*sn;
a[q][j]=-fm*sn+a[q][j]*cn;
(i!
fm=a[i][p];
a[i][p]=fm*cn+a[i][q]*sn;
a[i][q]=-fm*sn+a[i][q]*cn;
intmain(){
doublea[5][5];
%lf"
a[i][j]);
eejcb(a,5,0.0000001);
i++){
if(i>
0)
%.6lf"
a[i][i]);
SXF01
chara[300],b;
voidfun(chara[],char);
b=getchar();
fun(a,b);
puts(a);
voidfun(chara[],charb)
{inti,j;
a[i]!
)
if(a[i]==b)
{for(j=i;
a[j]=a[j+1];
elsei++;
SXF02
{inti,n;
chara[10][20];
voidsortstr(chara[10][20],int);
sortstr(a,n);
{if(i)printf("
%s"
if(i==0)printf("
voidsortstr(chara[10][20],intn)
{inti,j;
charb[20]={'
if(strcmp(a[i],a[j])>
0)strcpy(b,a[i]),strcpy(a[i],a[j]),strcpy(a[j],b);
SXF06
{inti,j=1;
intIsP(intn);
for(i=300;
=400;
if(IsP(i))if(j==1)printf("
i),j++;
intIsP(intn)
{intw;
for(w=2;
w<
=n/2;
w++)
if(n%w==0)return0;
return1;
SXF098
{inta[10]={13,24,25,44,57,63,66,78,90,100};
inttop=9,bop=0,i,n;
i=(top+bop)/2;
while(a[i]!
=n&
=bop)
{if(n>
a[i])bop=i+1;
elsetop=i-1;
if(a[i]==n)printf("
i+1);
elseprintf("
未找到\n"
SXF09
inta[10],i;
voidsort(inta[10],intn);
10;
a[i]);
sort(a,10);
{if(i!
=9)printf("
%d"
if(i==9)printf("
voidsort(inta[10],intn)
{inti,j,t;
n-1;
n-1-i;
if(a[j]<
a[j+1])t=a[j],a[j]=a[j+1],a[j+1]=t;
SXF10
voidsort(inta[10],inti)
{intn,m,t;
for(m=n;
if(a[n]>
a[m])t=a[n],a[n]=a[m],a[m]=t;
SXF11
{inta[10000],n,temp,mo,i,j,k=1;
a[0]=1;
for(i=2;
=n;
{for(j=1,mo=0;
=k;
{temp=a[j-1]*i+mo;
a[j-1]=temp%10;
mo=temp/10;
while(mo)
{a[++k-1]=mo%10;
mo=mo/10;
k>
=1;
k--)
a[k-1]);
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 西工大 语言 实验 100 04