查看: 3402|回复: 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);
- z8 e, r) \" S4 n% R Y- z printf("%f",a);
$ {; h) B/ I- U7 {7 b/ N5 B }4 h+ ?# a; k. `( h8 H
<> for (i=0;i<n;i++)1 m: E, P! z/ F7 l/ r* x
for (j=0;j<m;j++)6 f" @, n$ Q6 w4 L f* x
 if (j==m-1) printf("%15.2f\n",a[i*m+j]);
7 M! f' V6 X# U( y! M2 _, t& F _ else printf("%15.2f",a[i*m+j]);5 D5 ~1 T f. F6 |$ i
<> for(i=0;i<m;i++)7 x, A5 m) N# u% g. b
 {3 p6 ?3 a: J: Q: n# c- {3 ^
for(j=0;j<n;j++)
b+=1.0/n*a[i+j*m];
. y& y, f( P; ^4 t }
( r4 m' B, i9 ^) q* G<>$ m% l2 u, H. Y5 x8 M8 f
 fclose(fa);
( ^' k: n3 I, ^# e" z- \<> if((fb=fopen("result.txt","w"))==NULL)0 Q4 z8 i: D ^
 {
5 X% Q) j8 c4 d o A% Y9 w& y printf("Result file do not exist.\n");
8 Q' {9 i- {5 p$ h) t( q) F% h exit(0);" }) ? {, S- L1 B! P8 N3 V% @( b
 }
 X3 o. S+ V+ `3 f" q. }% W<> else
: p* f1 Q( S# f3 _! y {4 C" z0 L0 d& L* m5 S
fprintf(fb,"The average of matrix:\n");
; t7 H) h5 \4 s" E3 K fprintf(fb,"\n");
4 l/ [8 \" k0 @$ T* M0 ^& C9 u( P! @- a for(i=0;i<m;i++)
* B% {: J* l: {- X fprintf(fb,"%15.3f",b);: w$ R2 J8 Z4 J! H s/ z
fprintf(fb,"\n");
7 }9 t- N! r3 q! m$ f6 R A! b6 c }
1 {% M c' ~" x, r9 l) _* F fclose(fb);6 f( z# g( @5 [4 F" O5 q$ S9 N
 printf("Have done!The result in file:result.txt\n");
5 W8 ?/ b5 N; \ y* s: m( I, G<>}