查看: 3383|回复: 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);" M, [: i* T X _# W
printf("%f",a);, T- S5 {& K9 y& w1 k z
 }; ?( z8 o t1 Y3 R8 E: F# ?: t
<> for (i=0;i<n;i++)0 |7 Z$ ]* i" b W: v, G
for (j=0;j<m;j++). F$ e9 ]5 h$ @" l. Z! g B
 if (j==m-1) printf("%15.2f\n",a[i*m+j]);
, _2 r) u! H5 x! @ else printf("%15.2f",a[i*m+j]);) X* n, w/ V3 w4 G, p
<> for(i=0;i<m;i++): u1 A8 Z& n9 \/ r# Z
 {1 f C Q/ n, U+ o
for(j=0;j<n;j++)
9 p; J( m! U9 C( x' c/ M b+=1.0/n*a[i+j*m];
 q6 [8 ^: m3 y. O4 }+ B }0 E( X3 V" {+ [: c' `
<>
- e: `: F; o3 i fclose(fa);
, N7 w' g Y; \) y<> if((fb=fopen("result.txt","w"))==NULL)& z, [7 b2 \! K8 r+ Q$ o
 {, p. N" b; i, @0 _' f0 q1 x
printf("Result file do not exist.\n");6 u, x- t* J1 S
exit(0);
$ d: b# S+ }' C, o2 y; I: a- k }5 ~7 o" f, X( N. A
<> else
, r( Z* s% B, \( _ {
" y7 g5 X g. y9 w; i fprintf(fb,"The average of matrix:\n");
 |3 ]/ P$ c2 W i7 Y( H fprintf(fb,"\n");
4 v' H* i M$ J: {, e9 u; J! R for(i=0;i<m;i++)
; C3 B7 t! X' u8 S( v- v4 s fprintf(fb,"%15.3f",b);
+ [+ P m; |9 T7 i$ q: C fprintf(fb,"\n");6 P6 y* o ^; @0 A6 P2 ^
 }
 @! O2 z1 @* G6 S/ y8 r/ @: j- u fclose(fb);
8 T2 m/ i9 } U7 v printf("Have done!The result in file:result.txt\n");, G( E1 }* e) q7 x% J0 r) ^% N6 K
<>}