- 在线时间
- 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>6 E4 k+ w0 k& Q4 b) \; M3 Q/ Q6 M
< >#include<stdio.h>
) q2 S. e( }+ h: s/ j* F#define N 100
+ v: t8 |; A& I4 d* o( J#define M 20</P>
. a! V- Z$ E: a< >void main()/ A5 W1 Q) @" {5 _3 E; R
{2 B/ k* E. g' M9 _3 M
FILE *fa,*fb;) s" G& ]* j P2 I" q, L$ |
char filename[30];
9 m/ Q5 r- C- z* ] int n,m,i,j;# S7 N( D6 k+ I/ }7 \# M
double a[N*M]={0.0},b[M]={0.0};</P>1 @% A4 H) }) M O+ O
< > printf(" lease input the number of columns and lines of matrix:n,m\n",N,M);
1 V# \/ Y# D a scanf("%d%d",&n,&m);</P>
* L1 G* N) h7 f$ m5 A4 I# z+ S< > while(n>N||n<=0||m>M||m<=0)
0 j+ j7 @, J- b% ]/ S {3 ], k9 z, W B
printf(" lease input number of matrix:n(0<n<N),m(0<m<M)again!\n",N,M);$ [8 {) }% g9 `! a
scanf("%d%d",&n,&m);
3 G. I! _' Y% [: P3 d }</P>+ {) Y, I L' [
< > printf(" lease input a filename:\n");
- ]8 v' m' }- ? printf("\n");- \: a6 Z2 I( \6 N! T) s% R
scanf("%s",filename);</P>$ ?' L# P$ ^0 ^( j* k z# d' `
< > if((fa=fopen(filename,"r"))==NULL)7 Y! M1 b0 J) v# o- Y
{
$ `0 y% Y+ M. u printf("File is not exist.Please creat a file.\n");
# @8 N8 A* R- O" ` exit(0);& N% q Q }& R6 H1 D6 C
}) k: s7 j' x( x- A( H. q7 g
% m4 R, g/ T8 w; ~3 q' {
while(!feof(fa)): |% W' |4 c) P; p& l
{/ x+ ^6 w) |( X0 a2 n
for(i=0;i<m;i++)
. I% A' `, |; z x fscanf(fa,"%f",&a);
& n; S2 u% }' p& M printf("%f",a);2 F8 c# d. p6 F
}</P>
5 ?, w M- Q% k/ G7 q< > for (i=0;i<n;i++)* Q& o* O5 v) f9 ^* R
for (j=0;j<m;j++)% q/ x2 ?0 V+ Y" v+ t( M( p, h
if (j==m-1) printf("%15.2f\n",a[i*m+j]);
0 x% a7 i! j$ Q$ q% T* c else printf("%15.2f",a[i*m+j]);</P>, i; \% y8 e4 \ I
< > for(i=0;i<m;i++)9 [7 O6 @' w( @4 w( j+ \. u, Q" m
{+ X3 I; B* o/ r' w
for(j=0;j<n;j++)
- ^) O8 v4 X& |2 } b+=1.0/n*a[i+j*m];
2 f. R3 _) {/ R5 I }</P>
6 ]" ^- c; } W* f< >
" ^3 [/ M7 }0 O9 k4 l2 M" g, Z fclose(fa);</P>3 L1 I' g: D* ^( N8 [- o
< > if((fb=fopen("result.txt","w"))==NULL)+ ~" N1 \6 y, v, _$ `5 w
{* H6 u$ t" z, H6 E8 L4 i% F
printf("Result file do not exist.\n");" S! I+ ? w' O6 H
exit(0);) q5 M) f+ n! Y+ A4 H+ B
}</P>2 A% ^9 i$ ?; J i4 v/ R
< > else: u2 T" k7 q3 M; T3 g5 ~
{
0 s1 ]. d9 C/ y3 c1 t fprintf(fb,"The average of matrix:\n");, Q5 x6 j A4 [% m { q3 t
fprintf(fb,"\n");) H! m& H9 {7 L9 ~! n. m- `; E; A) _
for(i=0;i<m;i++)& C* b3 q* S3 I8 \0 R; }2 M
fprintf(fb,"%15.3f",b);. V* e1 S: v. w; |& p
fprintf(fb,"\n");
6 Z$ T: D# V5 E' U' P/ h }
# W. {4 _. g& c: B fclose(fb);% A- F5 p( \. `& q; s" T7 X
printf("Have done!The result in file:result.txt\n");</P>. `# i' D' d- _. t
< >}</P> |
zan
|