- 在线时间
- 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>
* \ D0 E9 }$ n/ J1 o< >#include<stdio.h>
9 p: M& e% q4 d$ e1 U#define N 1007 G3 F( g/ o- `
#define M 20</P>
7 h9 h) V+ R& U Q8 y/ X< >void main()
% `* _& S6 Z: j5 G0 y7 x5 c0 {{
% D+ Q/ O" k7 ^1 e0 ]5 f FILE *fa,*fb;& @* ~1 K6 Y+ e; i t& R# h
char filename[30];: g6 E. }, X f
int n,m,i,j;. d1 r& ]9 O" p" v
double a[N*M]={0.0},b[M]={0.0};</P>- u: `$ ]3 E0 [& @% e
< > printf(" lease input the number of columns and lines of matrix:n,m\n",N,M);4 j7 L; n4 ^7 T: T" s
scanf("%d%d",&n,&m);</P>! E5 Q; _ P/ V' I( \
< > while(n>N||n<=0||m>M||m<=0)
9 ]* n; k) ~' f5 s' Q- n {2 C% ~6 P5 v5 R
printf(" lease input number of matrix:n(0<n<N),m(0<m<M)again!\n",N,M);9 @+ x) K4 [! d0 s/ F3 A
scanf("%d%d",&n,&m);/ O1 ]0 c8 z) j6 a
}</P>
, k8 a1 N; ^" @% N: q# n< > printf(" lease input a filename:\n");$ }5 E* l/ y% K$ c5 a
printf("\n"); ]$ X5 p4 L- K
scanf("%s",filename);</P>- x% A- Q# a) I( ^9 e9 Y
< > if((fa=fopen(filename,"r"))==NULL)
% a4 F* N# c( @, [8 F {5 I0 O! X k+ \. I( G4 ~/ D8 k
printf("File is not exist.Please creat a file.\n");
& j0 ^3 v2 y% g, F- V exit(0);
. V6 i8 p; M D. \2 n }- v' k# L' n, d) `3 l4 `
) e0 a$ y) I8 B. Z
while(!feof(fa))
3 r9 E5 g; c7 |1 p/ a {
2 v. n2 S0 f+ b9 K for(i=0;i<m;i++)
4 w H T1 l5 Y0 F fscanf(fa,"%f",&a);
& @2 x5 q6 L: ^. Y printf("%f",a);1 x* o* k; x# Y
}</P>
$ {4 g- H* A1 L% i( V2 h( U ~( G& z< > for (i=0;i<n;i++)4 U' A. `- P* ? o: o
for (j=0;j<m;j++)( [. j4 a+ g% e" \4 P0 S7 s
if (j==m-1) printf("%15.2f\n",a[i*m+j]);
" g$ u4 e9 _7 G. p: O. j else printf("%15.2f",a[i*m+j]);</P>
, g" C5 I' f& ?; [" E< > for(i=0;i<m;i++)! b3 i8 ?+ p: @8 W, n
{3 u9 \/ G4 |! Y- [" ^
for(j=0;j<n;j++)% W5 p3 z9 w/ t
b+=1.0/n*a[i+j*m];8 ^5 Y3 e1 q0 _0 A9 ]
}</P>; R6 b) r* l" X5 T" R$ _
< >) A: t; {; f+ l7 C% e
fclose(fa);</P>' s# S9 V8 t+ c' d
< > if((fb=fopen("result.txt","w"))==NULL)
@ F. t) O$ J6 W) m" G {
6 ]; O: E% ?1 b' U0 S! M% h printf("Result file do not exist.\n");
6 i3 o, }8 G0 s$ _( D exit(0);
h& N/ S( G% \( U" K4 _& g }</P>
! `: _' I# Y3 W. A< > else4 S$ `4 y9 I2 @ W
{
( L# E6 ]6 T) l fprintf(fb,"The average of matrix:\n");
+ V4 Q H5 Q7 J: f% r& R( p; p( u fprintf(fb,"\n");
4 w' p) L' ?& l o+ Y. k6 A for(i=0;i<m;i++)
: B& c1 b+ M( ?3 z# @. ?$ `9 W8 o8 J9 C- b fprintf(fb,"%15.3f",b);4 ?0 ?) J1 I; @7 s
fprintf(fb,"\n");
4 E; E# V O1 J0 |1 l& n% h }
" y4 M, {& Y6 N+ o) N3 j6 F; J fclose(fb);9 H8 x' ^# c) I+ q/ k
printf("Have done!The result in file:result.txt\n");</P>
8 \. Y1 Y+ d6 y1 h% C< >}</P> |
zan
|