- 在线时间
- 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>! b: m) p* T$ F1 L" n; ~% B% N
< >#include<stdio.h>! f W; @1 k( E# U6 U, m/ X
#define N 100
5 x4 |/ `1 K& G' k, h#define M 20</P>3 H% m1 T7 F, _7 C* W# E
< >void main()2 B2 o$ I2 D! Z7 m0 J: ~7 x
{
& p* W2 E5 M' `$ N FILE *fa,*fb;- y. i R: u! R
char filename[30];# V# k/ r9 M) i; m. j
int n,m,i,j;, B. T( I; z0 t- O M
double a[N*M]={0.0},b[M]={0.0};</P>
! [8 D+ l; o' e' u) H) n8 B< > printf(" lease input the number of columns and lines of matrix:n,m\n",N,M);
, y. U+ @3 @: U7 C9 T9 v, |% H2 Z scanf("%d%d",&n,&m);</P>& J2 p; N* N. ~9 r2 g+ W
< > while(n>N||n<=0||m>M||m<=0)
& i( e' X% }4 i/ M {
* Y# F% V8 y) n printf(" lease input number of matrix:n(0<n<N),m(0<m<M)again!\n",N,M);
! \; W/ A. W2 V: v y5 {/ j! H scanf("%d%d",&n,&m);" s- A q# n- m. y; ]
}</P>1 f+ I- H& Q' U4 H
< > printf(" lease input a filename:\n");3 L, _5 U7 \* _5 v* S& A
printf("\n");- Z! N9 l! @/ c; ? t7 t: u
scanf("%s",filename);</P>
, _& d# U4 Q; g< > if((fa=fopen(filename,"r"))==NULL)0 O3 z7 t0 s+ u; j. b
{1 s+ i+ f& P, W1 O8 l# y+ E
printf("File is not exist.Please creat a file.\n");
f) b- s% Z. J' t7 h/ T exit(0);& }2 B' o: s. I1 I9 p5 S
}
- `+ i* L5 L' ?9 y 9 a: n. A8 V( v1 {* U. x. y
while(!feof(fa))
3 ]% o1 K [% G2 u5 j! _8 c {
2 \% D8 L( c% z! z$ j( O for(i=0;i<m;i++), b, J1 E7 `# J2 Q' ?
fscanf(fa,"%f",&a);6 V1 G, y6 N3 F$ q( g
printf("%f",a);
. d# I$ V- K4 b& n- w }</P>
& e0 v' X9 u5 J. S3 {9 A' {; h( p< > for (i=0;i<n;i++)' g( ]$ H- c! \8 k
for (j=0;j<m;j++)
9 b) N( Y' P1 S0 u6 W2 c- l: W if (j==m-1) printf("%15.2f\n",a[i*m+j]);4 y8 F2 e& D& g" d) N: A
else printf("%15.2f",a[i*m+j]);</P>, W& }5 H% f |! m$ N; S
< > for(i=0;i<m;i++)
8 D! U; h$ E$ V6 a6 D {; ^+ x& ~3 }! i
for(j=0;j<n;j++)
# Q6 D! l, h; u# p& S ? b+=1.0/n*a[i+j*m];
1 ~' J# d. ^4 |$ S }</P>
1 T" _6 W) x7 ^3 [0 S& }/ K< >
3 C. r1 _: V2 }0 A7 D fclose(fa);</P>5 P7 j$ s+ Y7 F4 |" M& _$ }4 a( l
< > if((fb=fopen("result.txt","w"))==NULL)0 w# T% \1 E( v1 o
{" S6 Q; \2 z. c9 w
printf("Result file do not exist.\n");0 q, y# d1 M+ r" T* T0 s9 y
exit(0);; o$ o+ b: y8 Z
}</P>
6 q ?; ~5 T9 A* M5 u/ Y8 l< > else
$ x d d( W+ Y; y! x {
v$ n% |$ I+ {7 B# D fprintf(fb,"The average of matrix:\n");/ E3 Z0 f r6 f7 j: V% c
fprintf(fb,"\n"); b' I9 z! y( f' S
for(i=0;i<m;i++)$ i/ q& Q* P1 Z. ~0 A# t
fprintf(fb,"%15.3f",b);- r1 @# l5 ^! A: P/ R& _
fprintf(fb,"\n");8 u; Z6 _7 f9 ^) u7 \; v
}5 c9 Z* V; F7 M/ l
fclose(fb); ], c$ E* m# W+ `! o) O W
printf("Have done!The result in file:result.txt\n");</P>
; p/ Y& V7 N7 B8 P5 S< >}</P> |
zan
|