查看: 3357|回复: 1

[求助]C做的一个程序，读不进去数据哦~~~

字体大小: 正常放大

lavender

1 主题	0 听众	17 积分

升级 12.63%

该用户从未签到

电梯直达

1^#

发表于 2005-5-8 22:14 |只看该作者 |倒序浏览

|招呼Ta 关注Ta

<

>这是求矩阵的列的平均值的程序
<

>#include<stdio.h>
#define N 100
#define M 20
<

>void main()
{
FILE *fa,*fb;
char filename[30];
int n,m,i,j;
double a[N*M]={0.0},b[M]={0.0};
<

> printf("

lease input the number of columns and lines of matrix:n,m\n",N,M);
scanf("%d%d",&n,&m);
<

> while(n>N||n<=0||m>M||m<=0)
{
printf("

lease input number of matrix:n(0<n<N),m(0<m<M)again!\n",N,M);
scanf("%d%d",&n,&m);
}
<

> printf("

lease input a filename:\n");
printf("\n");
scanf("%s",filename);
<

> if((fa=fopen(filename,"r"))==NULL)
{
 printf("File is not exist.Please creat a file.\n");
 exit(0);
}

 while(!feof(fa))
 {
for(i=0;i<m;i++)
fscanf(fa,"%f",&a);0 y1 X9 O q @9 K
printf("%f",a);6 M. p' t1 ?2 k7 b4 Q2 O X
 }
# W1 ?( ?% c2 Y<> for (i=0;i<n;i++)
% W: P: K! A8 R* ?! u for (j=0;j<m;j++)
/ J; N) S1 [' v$ h if (j==m-1) printf("%15.2f\n",a[i*m+j]);
5 V0 E5 T" z* j else printf("%15.2f",a[i*m+j]);
5 N* `7 U" c* Y: j( h<> for(i=0;i<m;i++)
/ v) C c- }( O- ~$ n4 F" H {% W/ w+ }" ^$ A$ a$ {' N
for(j=0;j<n;j++)' L, C: G, M* G. W. {
b+=1.0/n*a[i+j*m];
9 w9 _( \/ X8 W1 h& O, G }
5 O4 D' [! h- T1 }0 O" Y<># m# r$ ?0 _- X
 fclose(fa);
) a' v( P- M6 R' a9 p) w# B<> if((fb=fopen("result.txt","w"))==NULL)3 W/ I7 o+ z3 V+ l
 {; B: w) u/ A, q
printf("Result file do not exist.\n");
& M% }; b8 F5 p. V8 g1 B exit(0);4 D, f f- `1 m1 T# Q Y
 }
% `1 I) P3 @ w# w4 `<> else
% [/ j3 @$ ]. ]& Y6 Y# o$ i1 h( I {
, F, A" O" H- y+ W0 D& m4 u fprintf(fb,"The average of matrix:\n");, b. w( d- p( |& M
fprintf(fb,"\n");
4 {: N+ s. ]$ P for(i=0;i<m;i++)9 W3 F1 Q6 k+ ?+ O. }: A1 k
fprintf(fb,"%15.3f",b);
! r' m% T8 [$ [ B" W0 S. N) p fprintf(fb,"\n");
6 r7 c9 e# n8 t8 _ }
, i) x) u, }" U% i$ |) q fclose(fb);: {6 X J; y5 i
 printf("Have done!The result in file:result.txt\n");5 P/ f$ \3 v$ W
<>}