- 在线时间
- 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>
+ L, M; x5 Q! V4 u6 L1 o< >#include<stdio.h>8 o6 J% h2 L5 Y
#define N 100
, L/ U! a$ {5 u9 S( w R8 R4 M#define M 20</P>7 _7 v0 h9 ?5 k! M# ]
< >void main()
6 m p q; m' M{* ~7 A( k* \# T# J: B7 W
FILE *fa,*fb;# f# d7 c5 I( N. S4 h+ I( k
char filename[30];" S( T4 H& |) G
int n,m,i,j;; v+ x3 y6 U- d: `5 B7 e% d/ M- r/ i
double a[N*M]={0.0},b[M]={0.0};</P>) l7 b7 y8 K( }+ z) l
< > printf(" lease input the number of columns and lines of matrix:n,m\n",N,M);& C& V& y* B2 j# f4 r% D
scanf("%d%d",&n,&m);</P>
% a( i2 y. Q* Y- u# E5 K< > while(n>N||n<=0||m>M||m<=0)
7 f5 p$ s6 S4 {# D3 H1 u' `$ h {3 n2 S7 A/ u( O B$ s! f
printf(" lease input number of matrix:n(0<n<N),m(0<m<M)again!\n",N,M);
5 R3 ]7 C) n% h% F+ G! b z scanf("%d%d",&n,&m);
l5 o7 @0 S( [1 A, M7 V }</P>/ z: i6 U( b; [# |8 k1 J/ n, ^
< > printf(" lease input a filename:\n");& s- u) G% j6 r$ [, Z; [2 }
printf("\n");' ^7 C5 @/ Y7 A1 T) J& X
scanf("%s",filename);</P>7 L* T. J7 k% ?% l3 \! x
< > if((fa=fopen(filename,"r"))==NULL)
+ k N9 W* _! X {# y; T) H# A* J6 N
printf("File is not exist.Please creat a file.\n");8 e$ M0 E$ o- x$ [2 @, }) s
exit(0);
1 \8 v; \* X8 w/ Z4 ]* F3 E }7 u( [% h* [: @5 B3 \
# N6 b$ A: g9 w while(!feof(fa))4 f9 l @0 p3 ?
{
/ E# |/ x/ m% @# O for(i=0;i<m;i++)
. V9 w" a! k3 B8 P8 t$ {, b9 K1 D fscanf(fa,"%f",&a);
- P5 F" s2 P" P) S# ~: Q printf("%f",a);5 W/ o' h9 h2 ?
}</P># D( `8 ]3 h9 B8 O7 q8 j: J
< > for (i=0;i<n;i++)
2 {& n! e* N4 R7 U9 P for (j=0;j<m;j++)6 n* W* h; N/ ^2 a9 e
if (j==m-1) printf("%15.2f\n",a[i*m+j]);3 d l5 ^4 t- p% E$ l
else printf("%15.2f",a[i*m+j]);</P>" Y4 b4 r) z" O+ ~' y8 G9 p
< > for(i=0;i<m;i++)9 q' k. f4 l7 ~7 [3 z
{* X3 ?3 s& c0 ~- o% a
for(j=0;j<n;j++)& L- E9 i f, R- I
b+=1.0/n*a[i+j*m];
5 a( x1 _$ w' {/ z }</P>! Y0 o7 l. n4 B7 y+ B) g' `
< >6 S5 b! V# k7 N
fclose(fa);</P>) k8 k7 ?! K; Z) [# B. A) U
< > if((fb=fopen("result.txt","w"))==NULL)
$ s! Y& V1 Y' v, o {
( e' H* f! f, n- l printf("Result file do not exist.\n");
! a0 i Z3 U% W1 w: R exit(0);
* U+ j' r9 H7 {$ M }</P>4 B6 P: ]7 D' n
< > else
: U, a7 b. l D5 T5 g1 `0 C& [4 \. I {2 ~. R9 K' y) u8 O) f, ^: I4 A
fprintf(fb,"The average of matrix:\n");
) i- T% c& k. V* n4 D fprintf(fb,"\n");( H2 u1 q3 H u2 M4 L) G, a
for(i=0;i<m;i++)
! X* d& z: w0 S: O" s# Q4 z+ b fprintf(fb,"%15.3f",b);
8 r h' y1 `! q fprintf(fb,"\n");8 v7 ?. Q# T. Z
}% ]' _8 ]: d* c4 `% z1 a
fclose(fb);
" U0 W# V1 r6 m% Y @, u0 Z/ q! ^ printf("Have done!The result in file:result.txt\n");</P>
! Q! E, C& z7 n/ h. V8 c4 H c9 C# ~< >}</P> |
zan
|