- 在线时间
- 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>9 `0 N4 F/ p1 c3 M- n8 b$ @
< >#include<stdio.h>" d( j0 O. U' P) r
#define N 100
" R# j: W6 k0 h; y% K" m$ A) F#define M 20</P>9 x" E6 p9 O2 T0 F# H7 Z) [
< >void main()
2 [5 F/ s3 I4 e" U% |0 s{
: P8 E$ u s# k7 Z1 `$ o0 u FILE *fa,*fb;
8 o; h' q' H0 A0 {1 U- _' J char filename[30];3 M8 O& e; h2 E9 D
int n,m,i,j;
# c" A/ Z' U! b; x7 E2 z1 w double a[N*M]={0.0},b[M]={0.0};</P>, P9 j" S' _ ^7 C7 Z+ D6 [5 E
< > printf(" lease input the number of columns and lines of matrix:n,m\n",N,M);
5 H, Y% j3 | l scanf("%d%d",&n,&m);</P> Z, C! g% z. q: R# r$ b% J
< > while(n>N||n<=0||m>M||m<=0)! b' A. s3 F- G: k
{; F, ?& ~3 o0 m+ e/ A6 D! G
printf(" lease input number of matrix:n(0<n<N),m(0<m<M)again!\n",N,M); g; x3 V' x, h6 e2 n8 ~; a
scanf("%d%d",&n,&m);. o; p6 {! r$ D1 z% p5 W
}</P>
- i" `4 g+ c0 \' Z< > printf(" lease input a filename:\n");
; s! e8 m; O* O' t2 R3 |6 _2 A printf("\n");+ y; b* T# m4 M/ E! _
scanf("%s",filename);</P>7 [( ~1 ~5 q. Q ]1 a
< > if((fa=fopen(filename,"r"))==NULL); T2 a5 Y) Z) o8 f a
{
h3 N9 E4 b2 J printf("File is not exist.Please creat a file.\n");
* O& M9 d6 ]0 O7 R; v* _ exit(0);
- _: y& H4 j! Q7 K9 f* C }! x& t6 o% l% Q( Y1 M L% L
' o5 G7 j! S! d2 S8 N+ Y. u while(!feof(fa))
- N D+ O7 E1 Q7 G {; B& o# p, o( y( @: }
for(i=0;i<m;i++)
0 _0 M4 p h v fscanf(fa,"%f",&a);3 c+ I+ s( b5 C5 q5 I
printf("%f",a);, o4 y, H9 m& K! l6 H
}</P>
+ U) g( w& W+ m7 |9 ]; M, a) O< > for (i=0;i<n;i++)
$ o. K# f1 ]1 ]5 n5 m4 x6 R5 [ for (j=0;j<m;j++)" W$ _ P* D9 J# K/ r
if (j==m-1) printf("%15.2f\n",a[i*m+j]);
% {4 N& J0 `, p3 e* b else printf("%15.2f",a[i*m+j]);</P>( w2 }; }, c' s( w5 `- V) z8 Y
< > for(i=0;i<m;i++)7 o$ k, i. u( _6 v7 o% i I/ u2 g
{
8 R/ `( s/ }& `2 Y* c5 Y& O4 _ for(j=0;j<n;j++)# ?8 R- [4 Q) P& y4 W' N
b+=1.0/n*a[i+j*m];% r4 z: N8 W0 O/ q! [' K
}</P>2 a7 d9 ], h. |* I# I3 N
< >6 \ ^7 x# d0 @1 y/ C8 f8 s! K
fclose(fa);</P># o, ?' d% M8 g6 ~9 K. x
< > if((fb=fopen("result.txt","w"))==NULL)4 o5 a+ V# Z$ ~. C I% m2 t! k e
{: }/ m8 L4 e! o; n- ^. H+ M8 U, ^
printf("Result file do not exist.\n");& `, Q* ]/ c, I+ F1 M* I2 u" B0 T
exit(0);
( g3 E& n9 M! {: y# Y1 l }</P>$ c9 w4 Y+ l8 e2 F/ O m; R0 v) `" x
< > else$ A# X [* m! z3 ?2 S% G
{9 D* {( E# P. D4 ]9 G: O
fprintf(fb,"The average of matrix:\n");
; Y* R* V$ g: { |* Y* n fprintf(fb,"\n");
; ?9 X3 ~0 x$ G' Z) z% i5 D1 J6 R+ G for(i=0;i<m;i++)% [! f S P: k, c
fprintf(fb,"%15.3f",b);! H' g z/ n; j0 m
fprintf(fb,"\n");
+ l h+ ~/ N9 v: L }
& Z& W( K2 k- P5 D fclose(fb);, c% \; f1 y5 D4 T* t T' m8 S) o
printf("Have done!The result in file:result.txt\n");</P>: o5 m8 n' s' ^/ J% \5 Q* j
< >}</P> |
zan
|