- 在线时间
- 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>( n! e: p3 p) K7 u
< >#include<stdio.h>
& m1 _3 V7 D) S' |) I! }#define N 100
+ a' q+ m1 u5 E8 d4 e+ a/ \#define M 20</P>
- W; f" B D8 E7 T5 y$ l; [ C0 B) U< >void main()! r4 M6 G' [; D0 `4 {
{5 U/ | s* V' m4 A& p q8 y5 N
FILE *fa,*fb;
! F* @, {/ D4 {1 a& q4 e3 k char filename[30];
6 I/ f1 x7 P# X8 Y) G. J* r/ } int n,m,i,j;
" x; U5 I8 ^9 ~5 Q, d6 b0 y) B double a[N*M]={0.0},b[M]={0.0};</P>
- N3 A4 K K2 y0 r" i< > printf(" lease input the number of columns and lines of matrix:n,m\n",N,M);) V. Z$ F1 L" w2 o. z( U4 M1 `
scanf("%d%d",&n,&m);</P> r5 M- i0 y! k8 {: r) B
< > while(n>N||n<=0||m>M||m<=0)- a0 e; k z: D5 x+ u4 e
{
, \$ a# |, A" p" J' s printf(" lease input number of matrix:n(0<n<N),m(0<m<M)again!\n",N,M);
# J" Z& [8 f% [8 v* T scanf("%d%d",&n,&m);+ r( w$ i/ H' \" Q/ d4 \
}</P>* l9 o) A( B# I- i( Q0 j8 h
< > printf(" lease input a filename:\n");
: C) P) K9 F& ` printf("\n"); E! T2 ?% q; ?! ^
scanf("%s",filename);</P>
8 i6 X/ g m7 z< > if((fa=fopen(filename,"r"))==NULL)
6 r$ _" J' ?+ J; ~( [4 L) I) o {$ l: T4 b7 G. P- a
printf("File is not exist.Please creat a file.\n");
6 m7 s U' \; P* ~' w9 Z9 `% p2 X exit(0);
0 m" C9 p5 e5 g( C x }
7 i8 ~# t) y' B9 F' A5 R, g/ U \
. K3 S* ]3 N: {# g8 G) C0 @ while(!feof(fa))( ^% m0 X# a& k }% s/ T ^" i
{
9 G; W/ R* P* F' y for(i=0;i<m;i++)
+ u- e$ l5 B" p fscanf(fa,"%f",&a);
3 ^( ^+ U% z2 }8 Q printf("%f",a);/ H3 m! K8 F: z3 ?& `. A, }3 r+ f" O
}</P>
: I6 F. [; D, U6 x& W, P< > for (i=0;i<n;i++)
" E: l) Q7 R5 T/ A( E for (j=0;j<m;j++)! y3 U: {- [& j- g
if (j==m-1) printf("%15.2f\n",a[i*m+j]);: Z) ^" X/ V& W' |7 U r
else printf("%15.2f",a[i*m+j]);</P>6 N( `6 p" x( a& ^: [8 z2 c. m
< > for(i=0;i<m;i++)
& n9 n* D0 p: ]: k: D: t {
$ \1 u5 M& q' R+ z for(j=0;j<n;j++)2 d/ E0 g L4 i
b+=1.0/n*a[i+j*m];5 l, j* F4 x# f* w
}</P>
1 o( K7 S& e: U! J2 h% S< >5 ~- R# v* v4 I& t
fclose(fa);</P>+ l. p7 t* R; ?) q' |& ?' W0 S& m
< > if((fb=fopen("result.txt","w"))==NULL)" E, i6 K( \3 [* C' F3 @9 W3 K
{
6 N0 q4 g) N% V, K- s printf("Result file do not exist.\n");: g& N( w* U- r; C
exit(0);1 s& U1 W1 I J Q+ `6 p
}</P>
" J* i2 z( p w" M: b5 ?< > else* ?& x* s H2 Y& ~% p$ i
{, I; @3 P+ s4 r& f6 J! N
fprintf(fb,"The average of matrix:\n");4 w( y" n- W, ] o4 }/ C; y
fprintf(fb,"\n");
6 \( y0 P+ ~+ h" K( ~ for(i=0;i<m;i++)
: ]3 y% K) e. U* a6 e/ J6 F- v& o fprintf(fb,"%15.3f",b);
- V: C: B- z I, a fprintf(fb,"\n");, O6 j: V7 W2 M& S; s
}7 ^. f4 k4 _/ _+ ]# p
fclose(fb);
b% N( i! k: }- ?2 ?1 M5 K" j# q printf("Have done!The result in file:result.txt\n");</P>7 N$ @1 U% }- d Q- G9 M( l. i
< >}</P> |
zan
|