- 在线时间
- 0 小时
- 最后登录
- 2005-5-8
- 注册时间
- 2005-5-8
- 听众数
- 0
- 收听数
- 0
- 能力
- 0 分
- 体力
- 55 点
- 威望
- 0 点
- 阅读权限
- 20
- 积分
- 17
- 相册
- 0
- 日志
- 0
- 记录
- 0
- 帖子
- 1
- 主题
- 1
- 精华
- 0
- 分享
- 0
- 好友
- 0
升级   12.63% 该用户从未签到
 |
< >这是求矩阵的列的平均值的程序</P>+ P% E; V1 u9 g9 p
< >#include<stdio.h>
1 w3 ?. V+ c6 D$ I) E+ Z) \#define N 100* a( {$ i7 Q+ @ H& S X
#define M 20</P>3 o3 |, S4 o6 N- r' P3 A9 y4 q! e
< >void main()
0 s p+ i- E% q, |7 Q7 c{
6 A* Z: t( k. |8 X" ~" t FILE *fa,*fb;% z" e, f2 ]3 k& |! r1 F. w2 T
char filename[30];
' U0 _2 s n! o5 x4 J int n,m,i,j;) ~& n( {9 K" H" U" L3 _, X
double a[N*M]={0.0},b[M]={0.0};</P>, Q3 U3 H2 f B o
< > printf(" lease input the number of columns and lines of matrix:n,m\n",N,M);6 D+ [: h# j- [, ~8 T
scanf("%d%d",&n,&m);</P>
; g, O! T" V* I$ C& F< > while(n>N||n<=0||m>M||m<=0)+ B9 n8 c2 J! R8 p
{) a. w3 n9 I# G6 H0 S
printf(" lease input number of matrix:n(0<n<N),m(0<m<M)again!\n",N,M);5 r1 Z5 j# T0 s& p/ U. X1 z
scanf("%d%d",&n,&m);, x+ U1 X* V# n5 V& C
}</P>- @& J- |3 a( X& U0 I5 z3 I, ?
< > printf(" lease input a filename:\n");4 Z _/ Q, E8 ~, J( R. q
printf("\n");& z8 n) d9 w; K
scanf("%s",filename);</P>
. A, ~4 ^% j# t i- W1 o< > if((fa=fopen(filename,"r"))==NULL)2 G$ E- h$ }$ S: R G! V! m2 g
{
a; ], @7 {1 }+ n! `0 b7 d4 p7 K* R printf("File is not exist.Please creat a file.\n");. o4 m4 B; Z# g) ]9 W
exit(0);0 ~/ m( B- x) u- z) w, n1 B! Y
}. j! p3 I l% ]) p
8 s' z& k/ k& _- t6 L% d
while(!feof(fa))6 D6 Z- P T4 B- j
{- r c4 \) q9 A# V% p
for(i=0;i<m;i++)
+ T. G& ^: z5 N fscanf(fa,"%f",&a);* v9 Z# e. ^6 F, }4 b; S e
printf("%f",a);. E2 T W7 H2 [' E A0 c
}</P>
6 |% ]2 [: M3 g) V. p: A' @< > for (i=0;i<n;i++)
0 o' z- _/ Y6 l. H O0 q6 G for (j=0;j<m;j++)
( r6 \ n, n: x, l0 |1 w if (j==m-1) printf("%15.2f\n",a[i*m+j]);
$ }2 j* X& V* u9 E else printf("%15.2f",a[i*m+j]);</P>
/ A( ~+ n! k5 K0 T/ \< > for(i=0;i<m;i++); [2 l+ h1 T2 f) N1 P3 M0 k
{( M5 s( |% G3 M5 A, v
for(j=0;j<n;j++)! [) H+ U9 I2 h" Q
b+=1.0/n*a[i+j*m];* {; J# P" m* u+ |6 a6 L% L' w" v* W
}</P>
2 l* w- m- _5 M+ O5 F4 N< >
5 x* E1 E2 E6 R# L" c1 E fclose(fa);</P>
$ C* u, q/ J6 n$ p9 b# Q. W< > if((fb=fopen("result.txt","w"))==NULL)" H$ d N& _* M h* U
{, M: U# y% V1 \# l% W* x
printf("Result file do not exist.\n");
1 c; X( Z! y+ Y exit(0);. W. G, S* P, b3 M( y
}</P>( a) i- Z9 _3 [7 b
< > else3 R3 m+ d, z5 J0 S% ?( P
{
2 z: T4 \$ u2 J5 U0 H5 O( {5 ^1 } fprintf(fb,"The average of matrix:\n");
; k Z! S3 a( Z+ N" g fprintf(fb,"\n");
3 T2 r% A* L( ]" ?. \ for(i=0;i<m;i++)
) r' f3 z( s, q fprintf(fb,"%15.3f",b);6 e5 M4 ?0 }: I6 H. Y4 N
fprintf(fb,"\n");
+ e5 V! U! B( g' G+ |. g }
, v( k3 B8 X& p) D& u fclose(fb);
9 e6 t6 J9 l; W0 ^% x2 W printf("Have done!The result in file:result.txt\n");</P>
+ e( X! m& [8 L, l" O< >}</P> |
zan
|