- 在线时间
- 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>
+ O3 S; T/ j: D< >#include<stdio.h>& Q! h0 v) F8 L
#define N 100 J" L7 p2 V$ S' V C, B0 T
#define M 20</P>+ {# B2 J& ^/ S0 z) {! v# }- Q# m: p
< >void main()
6 @8 l6 K1 ^$ Z+ |" }{
0 d+ F% P+ B; a( E( a FILE *fa,*fb;4 p7 Z% {% s( e
char filename[30];
5 q1 ?; \8 w4 Y5 A int n,m,i,j;! W& G1 Q7 [- m0 L
double a[N*M]={0.0},b[M]={0.0};</P> h1 l6 R4 |7 e2 G
< > printf(" lease input the number of columns and lines of matrix:n,m\n",N,M);
9 W! Y- L7 C4 K scanf("%d%d",&n,&m);</P>. W: y% S$ F2 R3 l0 p' k; U
< > while(n>N||n<=0||m>M||m<=0)8 v; o6 f, h% o7 |" K; Z
{
' S) i0 g4 h0 O" Z3 q& Z; N printf(" lease input number of matrix:n(0<n<N),m(0<m<M)again!\n",N,M);) u: t4 c& p, U/ n' f& M) T
scanf("%d%d",&n,&m);
0 E- Y2 d& ]) c2 {; h: j5 ] }</P>% L }, p7 o! d
< > printf(" lease input a filename:\n");
+ q: y& R) k2 H# V printf("\n");" N; `7 q6 d" r, |5 @, V" V
scanf("%s",filename);</P>9 v$ W4 L1 o/ ?, h6 N& Q
< > if((fa=fopen(filename,"r"))==NULL)
1 P! W( { q: z& Z {# C9 }! ^3 T. y
printf("File is not exist.Please creat a file.\n");- \5 d4 {0 p( D5 m7 V S- i
exit(0);
% R1 t; A6 z0 U8 n/ H; I: y }, A, M1 ^" y* h D
, k" L9 o5 g5 o c5 B* u+ C
while(!feof(fa))
' z) [) d( Z( s {; E, W: X# O( j% i( }
for(i=0;i<m;i++)- L+ {, r, j6 K7 D) x
fscanf(fa,"%f",&a);
* a8 N& l( L+ ~: @& A: z printf("%f",a);
$ n! [0 `5 {+ d* s* ]6 O' S }</P>$ W5 ^2 F6 a( D' k0 p
< > for (i=0;i<n;i++)- s c3 Y4 [0 E( H# C5 Y
for (j=0;j<m;j++)
! Y- s% L0 v! A- W if (j==m-1) printf("%15.2f\n",a[i*m+j]);8 a$ o) M2 b0 p1 Y$ J
else printf("%15.2f",a[i*m+j]);</P>0 @, N% h. y' X, g# `
< > for(i=0;i<m;i++)
9 o' ]2 R! T: t, _/ ?9 | {7 K9 o! z; }5 e8 d$ P) u; K+ _) t
for(j=0;j<n;j++)
. U0 }' ~& Q% Q$ r2 ?& ]' A b+=1.0/n*a[i+j*m];
" b; o5 H& _1 ~' z( ~1 w }</P>' G5 }0 I. y0 l
< >
8 F/ ?9 d. v- t1 `# v fclose(fa);</P>- Z; u( }6 U4 c |7 s+ u
< > if((fb=fopen("result.txt","w"))==NULL)
6 r0 q7 l/ R; I/ e% _2 H {
% s: O9 J' b5 h! _ printf("Result file do not exist.\n");9 C: a! X2 Q: b: A% w; s
exit(0);
: v5 z2 L! ? g& T0 O) ^; _9 i }</P>
: M5 Q5 {" ?; }! V% x< > else
# Z- `2 B% u1 f+ E {& d: K1 R# S" j7 l I
fprintf(fb,"The average of matrix:\n"); ?, @3 K8 R8 s$ V& B+ n
fprintf(fb,"\n");
" `: F p, b$ e, L, l8 b5 I for(i=0;i<m;i++)3 ^) N9 R$ \% _
fprintf(fb,"%15.3f",b);# w1 m1 h5 v. p- Z) D4 D* h
fprintf(fb,"\n");" Z5 V$ U, T' \2 d9 n/ O5 Y
}. J+ R0 o! c! ~9 v+ e% y+ E7 f
fclose(fb);9 ~# x, l; f8 t; w2 l
printf("Have done!The result in file:result.txt\n");</P>& P/ x5 ?- o' } u; B" h
< >}</P> |
zan
|