- 在线时间
- 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>
3 ~7 f' E% f. f5 B( F< >#include<stdio.h>" Q. F3 K" ~& l' \; }1 ?3 ?
#define N 1000 y+ \% B7 D" ?
#define M 20</P>
) j0 P( m$ q4 q4 M/ @< >void main()+ N- c& L4 \& m* _: h5 E( O0 O. ?4 n
{
! K5 A& Q7 `8 @ ]% } FILE *fa,*fb;, {/ g( n0 I% X) k& W" ]
char filename[30];4 @0 @/ m6 y/ K$ S3 Y/ R" |
int n,m,i,j;0 `: j. V9 Z, n# _5 J
double a[N*M]={0.0},b[M]={0.0};</P>
) i' c/ X w2 ?5 C/ Q8 d< > printf(" lease input the number of columns and lines of matrix:n,m\n",N,M);
5 d+ ~& o# a9 \8 s9 s9 [ scanf("%d%d",&n,&m);</P>
! A" d/ Z c Y* G< > while(n>N||n<=0||m>M||m<=0)
2 ?9 E2 j1 g3 i) y3 K$ v* v {
+ C% G* `8 z, h, ? [ printf(" lease input number of matrix:n(0<n<N),m(0<m<M)again!\n",N,M);9 X! F* S) R6 M$ i7 q# z+ i
scanf("%d%d",&n,&m);
3 {) X4 O3 Q+ Q% k }</P>1 @ q2 d* M: O+ C' X
< > printf(" lease input a filename:\n");
& _2 {3 i) o. h" ]0 A printf("\n");
8 @, ^. X* j9 | scanf("%s",filename);</P>% _* ^8 Q/ U; Q! ] H
< > if((fa=fopen(filename,"r"))==NULL)5 S3 V5 x6 J# @% q2 q. U
{
( m4 N9 B0 U* E' V: n) r( } printf("File is not exist.Please creat a file.\n");1 D) y Y0 G) T7 A" C
exit(0);
7 ^! v. d* r" P9 y% Z7 W0 C }
6 e) d+ v' l! x9 u; `
2 U+ h7 j D4 G0 C while(!feof(fa))/ E6 H! {: O. i0 q+ V- g' R5 K
{
9 L+ l1 _- N0 Q for(i=0;i<m;i++)
7 n# \- }. j. Y t# P fscanf(fa,"%f",&a);" d. c/ v3 \3 z, f
printf("%f",a);
- G4 n( N. ]: P ~4 \ }</P>
/ d- R/ s& M1 P7 t2 k3 T2 M< > for (i=0;i<n;i++)
! h0 x8 s! J ^: g$ Z" ?, W for (j=0;j<m;j++)
/ f0 F% P6 Q. _7 G, ~5 j! x- w7 v if (j==m-1) printf("%15.2f\n",a[i*m+j]);9 ]' C7 X& C4 n% x# B' h6 R) k
else printf("%15.2f",a[i*m+j]);</P>
: M: A3 b: n6 u" f3 a< > for(i=0;i<m;i++)
) n U$ I9 s1 K { k( g5 i3 J. g" G) V# v+ j
for(j=0;j<n;j++) d/ G i: U; Q. i$ c( w: a
b+=1.0/n*a[i+j*m];
% ^1 z" G' [: l' H }</P>
% M. o {: B2 j2 k( V( `2 ?% ]< >( H4 {9 P) _- c% M+ v! L) w
fclose(fa);</P>
* S7 w( B' J# t) [1 O/ t< > if((fb=fopen("result.txt","w"))==NULL)
0 y: }$ L# m" {3 `3 ]5 B! {$ Y {
2 ]8 ]- l$ `. S l; b. O printf("Result file do not exist.\n");
4 P4 H$ [2 V6 t. J; c exit(0);
* F* [# _/ ^; A& L# p, J }</P>
9 n. k: L# B9 h# j* e( ?4 |< > else
! e4 M! X( l7 z; a. L J {2 C2 p" p2 i) M. e1 Z W+ _
fprintf(fb,"The average of matrix:\n");
) L# C" a) A- G. d# D, w fprintf(fb,"\n");# f9 H; Z+ ^. b+ I( \6 k6 v
for(i=0;i<m;i++)
. L- G* u2 C! Y* c5 M3 Q fprintf(fb,"%15.3f",b);" b8 g0 W3 e, r3 J9 Q
fprintf(fb,"\n");
$ e# m4 h, y9 ~. T) L }, |, p9 Y: I h0 A$ [% @( t
fclose(fb);
* K% ^8 O. Y1 U2 C: n: q printf("Have done!The result in file:result.txt\n");</P>
5 H% d1 }' l# |( P( X< >}</P> |
zan
|