查看: 3348|回复: 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);
8 I% c4 Z$ [2 A5 ]4 b. ?2 A' T printf("%f",a);5 M# M) D5 N) j+ a" G [3 V4 z
 }' j7 Y! G6 i$ \* T- f# P9 i
<> for (i=0;i<n;i++)
 I; [8 v( Z0 N# V' Z for (j=0;j<m;j++)" F G7 ^' K6 K6 w+ Y
 if (j==m-1) printf("%15.2f\n",a[i*m+j]);4 E' b9 n3 }8 U. y6 L( C$ z4 i
 else printf("%15.2f",a[i*m+j]);3 F/ D V( X% Z1 I5 L; z" Z
<> for(i=0;i<m;i++)6 K& P+ C4 {, ]$ K% m
 {/ \* F; P, ~7 ~- ]8 q
for(j=0;j<n;j++)
 f$ @3 e2 _2 s" B5 R b+=1.0/n*a[i+j*m];8 [# p9 C- b* X7 j# @# Q2 k+ \
 }
9 m7 {7 |) x/ _. R" @2 q) r<>
2 p7 V1 H; m2 I: R' {$ w& v fclose(fa);# ~8 }& t: p& b2 T% A' @
<> if((fb=fopen("result.txt","w"))==NULL)+ a2 G4 u7 C* P# Q
 {$ E/ {- b {8 @! ~" r. T6 K" B/ K4 w
printf("Result file do not exist.\n");2 t n. V o7 A( w K
exit(0);- {- _! H6 A1 |/ B& N
 }
4 c% J! a4 e" _0 [6 u<> else! z# v p( S: H& Y, F4 l1 ^; ^
 {$ m: {% j3 Z7 v' w' k* O
fprintf(fb,"The average of matrix:\n");5 E6 A- Z4 x* d U! y- |
fprintf(fb,"\n");5 D; |+ J! [' h( m7 I
for(i=0;i<m;i++)- g3 o8 N* v0 H& M7 |' k6 V
fprintf(fb,"%15.3f",b);
! S, ^% y% W, j4 }3 B- d2 ~ fprintf(fb,"\n");
! R8 i; g) K4 j) E, c+ [* r- {* y) e }0 y' W& P/ v) F2 @( n
 fclose(fb);
( |) B( {! l' `2 O, g# E printf("Have done!The result in file:result.txt\n");
+ S3 e [" B. E' Y. Q1 k# n<>}