- 在线时间
- 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>) i* y& o+ D* r8 ]6 p3 @6 ~: Q; @! {
< >#include<stdio.h>/ M+ X2 m* `1 Y+ Y) I u. Q, V6 x
#define N 100* c. k+ G2 c! _ `
#define M 20</P>
3 b+ d' U/ K0 N" F T0 x< >void main()7 M* Z4 v u5 [+ R
{$ ~: K# I; g& T/ Y
FILE *fa,*fb;, R& z& T5 c# x: e8 A3 E2 T
char filename[30];, E f) ^2 P9 l9 K6 J, @9 C
int n,m,i,j;
3 D# Y- l# I2 k0 {, P double a[N*M]={0.0},b[M]={0.0};</P>
. u9 o0 L/ W/ e$ o1 |7 c; H< > printf(" lease input the number of columns and lines of matrix:n,m\n",N,M);# O% K& S' q4 G. B* l+ W
scanf("%d%d",&n,&m);</P>
# m, E: {5 x: v8 z0 u- s% W7 @< > while(n>N||n<=0||m>M||m<=0)
7 f* n: ~: N+ L& n- n7 P2 k' } {" c* e; \5 v9 k8 Z8 u3 ^- y
printf(" lease input number of matrix:n(0<n<N),m(0<m<M)again!\n",N,M);
: J4 d1 m0 `, d* n) g scanf("%d%d",&n,&m);
; c0 O- d; S4 Y+ s3 q }</P>4 a' |, ?- c% g$ v6 z9 Q! ]8 U/ ]
< > printf(" lease input a filename:\n");
7 T& U# l' z9 f$ y4 o) B6 u2 s printf("\n");
4 N8 B/ F. Y+ q( t/ @' T scanf("%s",filename);</P>
' C" t7 m3 |) m/ u% _/ |2 \- a& V$ I< > if((fa=fopen(filename,"r"))==NULL)6 t4 ^& ~1 a4 s! }% H
{: t) m5 T4 u/ |/ V
printf("File is not exist.Please creat a file.\n");1 P6 J; I5 |) K4 Y
exit(0);. D7 z% i* \( k
}
& i* x/ y+ y* F! L5 ]
3 C/ Z9 r/ v' F4 P, ^6 U% x) _ while(!feof(fa))0 }3 y( x8 p0 p/ _ P$ E1 b" r4 }
{* @0 S" x1 w/ P8 a, c* V- ?' L
for(i=0;i<m;i++) T* d4 m* d1 E4 M- Y# J
fscanf(fa,"%f",&a);
3 o, x- `' m6 {* r printf("%f",a);
; `" z2 [( b2 @9 O8 L7 U! t }</P>- Q4 T4 |1 S4 [4 p! c* V
< > for (i=0;i<n;i++)
, E* D1 |. N* ]9 M5 v- q for (j=0;j<m;j++)0 y% x: ^" `) E
if (j==m-1) printf("%15.2f\n",a[i*m+j]);8 m3 Z q* b& r* @
else printf("%15.2f",a[i*m+j]);</P>
- K: }# n* R* N7 h: p+ D% N" P/ Y< > for(i=0;i<m;i++)
: X0 `0 O, E5 f: R {
$ S# j3 V# h2 D+ P" k for(j=0;j<n;j++)
5 K* K! z9 b2 h# i2 B& U b+=1.0/n*a[i+j*m];
% E; K1 L* l& u0 ?5 [% A# g }</P>5 [; X k' x+ t, N7 k$ }
< >
. w1 j1 P4 Z, J5 c: K" G fclose(fa);</P># z6 N7 a5 `: O4 M. O1 R
< > if((fb=fopen("result.txt","w"))==NULL)* U5 k1 N# G$ V) d2 Y
{: ^7 b# u# B5 `& U: O {
printf("Result file do not exist.\n");+ y# Y2 W; F, X: @4 @
exit(0);
- S' o$ S# o8 ] }</P>
" e( S% T8 @) @. l/ E9 n< > else1 _0 x* ]) j3 d7 U3 O0 Z
{
& D/ t* x8 P/ A" `, S fprintf(fb,"The average of matrix:\n");% l6 l) C# ]- [2 L. n' _8 F
fprintf(fb,"\n");- h- U$ Q5 H: c, _- z/ O
for(i=0;i<m;i++)
' R$ r+ y1 V& A% J7 J fprintf(fb,"%15.3f",b);
; {+ d, k6 C# }6 Z5 V. k$ _ fprintf(fb,"\n");& `" d& ~) q' v/ ?- b. k8 ?! Z Z
}
5 L4 R. r, y" K# @. }' T5 W fclose(fb);
+ _! J2 ]- S2 q ~1 K4 H0 F2 o printf("Have done!The result in file:result.txt\n");</P>
& n! I3 t; Z8 z* a5 |< >}</P> |
zan
|