查看: 3350|回复: 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);
& d6 t1 c$ U$ ?3 P4 m printf("%f",a);
& D u8 K$ r4 G% a% q }4 |4 e B5 g# U) s) Z) c
<> for (i=0;i<n;i++)
7 T) }( S2 J- I+ D( P+ i. b for (j=0;j<m;j++)
. a, Q4 x" d8 Y! Z0 I# J9 h if (j==m-1) printf("%15.2f\n",a[i*m+j]);
& m3 |5 @& F+ {& U. C5 W else printf("%15.2f",a[i*m+j]);
+ E3 L% v/ c0 L' Z<> for(i=0;i<m;i++)
/ Z+ g* f: Y- g k2 K; D- x3 @ { K1 G# U) K9 j$ k8 m6 U" ]4 l
for(j=0;j<n;j++)
6 ~- h1 r5 `$ ^5 Q# y- o b+=1.0/n*a[i+j*m];
 {7 S9 f( k3 M }: M. i$ R" L# B3 k+ Q; s: z5 {
<>
1 g t& P5 Z2 j* e8 y fclose(fa);
6 J1 f+ F" g0 P' ~+ _<> if((fb=fopen("result.txt","w"))==NULL) l0 y7 w* L- k& N: D
 {
- ^' [0 Z2 _% ~# Y$ ~: m printf("Result file do not exist.\n");' E: C% Y5 H8 [/ z" _
exit(0);1 r; O, v& u) @5 M; k
 }
7 v7 d! G# _" W0 K& \) C2 W! j<> else0 K$ c( h; r) s6 x' q# e
 {
5 r" l8 g/ ~* d$ C4 c, s; g fprintf(fb,"The average of matrix:\n");) a1 }) g9 ~0 S8 o' T* g- q5 K$ C$ H
fprintf(fb,"\n");
" P" {0 M2 W; |: }" w1 m for(i=0;i<m;i++)& _( x( i! N5 Z V6 S) B
fprintf(fb,"%15.3f",b);
+ R+ N0 \7 [! r# J3 q fprintf(fb,"\n");5 G: X, N' A6 S% n7 M
 } T8 ~2 j, y% _7 \3 y8 |: L# {
 fclose(fb);
3 @9 ~( d. [ \; C5 y! [/ M! f printf("Have done!The result in file:result.txt\n");7 Z d# m4 U! B+ D* [, d( I& p$ e
<>}