查看: 3404|回复: 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);7 G5 R) ? d, M/ r l/ Y
printf("%f",a);
) m/ h% f7 u1 N8 G7 h- E$ a( ^" { }" S& s6 }: C. K, V- O
<> for (i=0;i<n;i++)3 b6 }+ U2 I% {! ~9 ? m
for (j=0;j<m;j++). w( F# ` x' J
 if (j==m-1) printf("%15.2f\n",a[i*m+j]);
; K; @3 q* t9 `% L$ l else printf("%15.2f",a[i*m+j]);
7 _4 a$ G) I* w1 k1 A. g4 H<> for(i=0;i<m;i++)
2 C- R* b, R- w1 r+ n0 Y- T {9 b6 H! s* L( P) }% u4 \9 L
for(j=0;j<n;j++)1 S8 n8 ~" ^9 w
b+=1.0/n*a[i+j*m];# I s$ K9 J6 T/ g
 }
8 E* g# m+ G# l$ a$ D- M( A<>5 O o- P. @) }8 h
 fclose(fa);
6 `" c3 i, Q& p<> if((fb=fopen("result.txt","w"))==NULL)
! d( g Z! R. k4 ]$ l2 L {# a6 [9 d: \1 e$ E* q x3 I( c
printf("Result file do not exist.\n");
# W) H, x4 [& K exit(0);
1 }/ A) w* A% q% ~8 k }
" L- x. `" t' G<> else% N3 a, m2 i2 o" m8 j% O8 W1 z( i& |
 {- Z! {. k7 }. k p5 b* [' g- f) J
fprintf(fb,"The average of matrix:\n");
5 K* D8 r W% L fprintf(fb,"\n");
$ F( T) t0 b# X for(i=0;i<m;i++)) Y; Q" k, h& E# p' ?
fprintf(fb,"%15.3f",b);
! d9 x t+ g; r8 O* j; i fprintf(fb,"\n");
$ c3 z4 l6 a) ~ y Y% `5 H }
; R1 q- C' g6 ` w9 ` fclose(fb);
7 {+ j# g3 k5 o* B printf("Have done!The result in file:result.txt\n");
; Q+ O# K- U$ j<>}