查看: 3406|回复: 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);
5 W6 ~# u9 b4 G6 P4 m printf("%f",a);' |; x! f( j! O2 P$ m9 u N7 S
 }
7 S2 ?' W" X% q N; ?! `<> for (i=0;i<n;i++)( y% }7 i& E9 e9 _& x# J$ `7 s
for (j=0;j<m;j++)& V) `. S' X5 ^
 if (j==m-1) printf("%15.2f\n",a[i*m+j]);, M$ D+ F2 B1 A8 y' l5 B
 else printf("%15.2f",a[i*m+j]);% n1 p. w, ~( V
<> for(i=0;i<m;i++)/ K0 y+ x$ p% q( U
 {. |! u% g! [& m4 Q, m
for(j=0;j<n;j++)
+ A' b [) J V+ [. M5 j5 y b+=1.0/n*a[i+j*m];1 W) d P$ G, T' T: K! h, o
 }# |: w$ r0 m% i) \& |* p9 y
<>2 _2 |" c. ?! [8 g
 fclose(fa);
 ~7 z* K1 T, D) P" d: g: c<> if((fb=fopen("result.txt","w"))==NULL)
6 T* v, y1 r- `7 b {
' M) r! e7 b2 w( Q printf("Result file do not exist.\n");+ R$ L8 q+ I8 f! g
exit(0);0 ~* k8 f( f, Z. [) B
 }
1 C" W) Z& A: Y3 |6 D<> else
% D6 B5 X) q) A3 h) V {: v" U6 @- B4 k( T; a
fprintf(fb,"The average of matrix:\n");
$ u- |) T4 d, S6 _: d* ^0 I fprintf(fb,"\n");
8 {$ K& N; f! C* |2 X for(i=0;i<m;i++)9 G$ a R% y/ U
fprintf(fb,"%15.3f",b);
: o9 x( d9 W K! M! b fprintf(fb,"\n");1 j+ v7 q G* [( B+ K
 }9 ^# f" P- S; d5 D; p5 T
 fclose(fb);, Z. q& n) n, U; T
 printf("Have done!The result in file:result.txt\n");
3 O ]/ q. d3 D; y+ [3 R<>}