- 在线时间
- 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># P8 t# j) F: F5 e( O& ?
< >#include<stdio.h>
, ^% p& R8 b1 }2 r#define N 100
- W4 J7 }- n; ^% y. B5 q/ U/ e#define M 20</P>
" B0 _) s6 x' x+ B& ^+ U; w< >void main()
' @9 u/ `, q- D0 x7 b{
+ y( R0 B# |/ t6 F4 y X FILE *fa,*fb;3 `) P3 r& H, p
char filename[30];3 t+ K3 ?0 m8 y* W
int n,m,i,j;( W, j8 h- o$ c O$ ~0 ~+ C1 d
double a[N*M]={0.0},b[M]={0.0};</P>. H9 N! B8 ` _' u4 |4 q& D
< > printf(" lease input the number of columns and lines of matrix:n,m\n",N,M);
m0 @& w. j, S3 b2 C9 P, \; S scanf("%d%d",&n,&m);</P>
! f. F! q. ^+ ` u< > while(n>N||n<=0||m>M||m<=0)1 @. X O. o: ]
{
; r+ V/ D; V9 j% P printf(" lease input number of matrix:n(0<n<N),m(0<m<M)again!\n",N,M);
$ @# X4 L& U( _$ P s scanf("%d%d",&n,&m);
" A/ U" n6 Z* ?- @8 G% b }</P>
Y/ C7 ^- V% e R0 }1 ]" N< > printf(" lease input a filename:\n");5 s4 n# w0 i8 c7 S6 V
printf("\n");
3 M# x$ T; D9 l/ k4 O$ s2 a scanf("%s",filename);</P>
" U, `) |: U* ?. b: ~+ D* ]9 k< > if((fa=fopen(filename,"r"))==NULL); D \+ l* y/ K# H; u. g
{$ t6 M6 b: ~9 E' ^; e* d7 E
printf("File is not exist.Please creat a file.\n");8 ]' H+ m( F+ `* c, Q0 V) ]4 {
exit(0);: e3 W, `7 X f$ ?
}1 d& g' m c/ y/ `
& R+ J8 L. [$ b5 K7 l' a. g while(!feof(fa)), b+ p% n# o% r9 ]/ x+ S: b
{6 w% R( e( |! n9 \
for(i=0;i<m;i++)
( j8 H- S m9 E) {! {9 Y! Q0 d& m4 Q fscanf(fa,"%f",&a);4 D) q0 @; w% H% {% s5 `6 p
printf("%f",a);; i7 ^! N) g' i! W
}</P>6 z/ F5 A$ x4 e% {1 f
< > for (i=0;i<n;i++)
; \7 s3 x" |; f+ v4 q, _9 y for (j=0;j<m;j++)" j. i @4 y+ X
if (j==m-1) printf("%15.2f\n",a[i*m+j]);
3 w/ j4 i9 ^+ R2 w1 `5 D! W7 a5 q( I else printf("%15.2f",a[i*m+j]);</P>, C0 M8 m0 W: d r! H
< > for(i=0;i<m;i++); ~. w3 s6 ^: `1 T6 q! ^/ K8 q( C
{
1 N0 r5 C- Z; y: @0 F n4 { for(j=0;j<n;j++)
4 D5 ]& Z u0 }4 ]5 ?! B b+=1.0/n*a[i+j*m];
) m/ d% [, s! V, _ }</P>0 n8 j5 X1 q0 P' {* B( m
< >, ?& p4 B2 N6 ]0 d6 [7 R
fclose(fa);</P>
8 w2 V5 b! k# `9 p, ?< > if((fb=fopen("result.txt","w"))==NULL)2 |5 V1 q0 r% w3 o
{; I! ^7 d- U/ T/ C7 S2 F) s
printf("Result file do not exist.\n");/ X4 e! h# i9 N4 x
exit(0);! B( ]1 D t, s# [5 Z1 E2 y" {
}</P>
4 f5 d7 S9 b* X+ a2 z- K8 V< > else8 w, F4 N. m/ _# [. F* l$ s
{3 Z) e! Z/ s0 Q- s
fprintf(fb,"The average of matrix:\n");
6 |" P( k, J7 Y+ f fprintf(fb,"\n");0 J* [8 r7 z6 _. z
for(i=0;i<m;i++)
$ ?' N! @8 Y8 U7 [+ ? fprintf(fb,"%15.3f",b);+ b7 y3 W7 D3 {$ j8 ^
fprintf(fb,"\n");
8 B/ D0 h! v, q* T2 L }, }0 N0 e7 Q. i# y' z& L& k% |/ K
fclose(fb);5 e2 e/ t1 \2 b5 M; I6 y
printf("Have done!The result in file:result.txt\n");</P>
* S* \# U% ]- ^& a0 ~& a; J5 k# i< >}</P> |
zan
|