- 在线时间
- 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> o+ v; L) [3 U6 n$ C/ Q
< >#include<stdio.h>5 j4 P3 N: ]( x
#define N 100, ]( o2 Y; H# c+ q, ?
#define M 20</P>* F* o7 B5 x" e) D% t
< >void main()
" i( |' i+ O: D w e{% F6 Y) t- k8 V6 \
FILE *fa,*fb;
1 i6 h) w( C4 m( Z I3 t2 D char filename[30];
; m9 b) B8 v/ ]9 O int n,m,i,j;( N" Q* Y( c2 d8 _/ S t3 B6 g
double a[N*M]={0.0},b[M]={0.0};</P>
5 E% \, y& E& ^6 g2 T* G o< > printf(" lease input the number of columns and lines of matrix:n,m\n",N,M);& d, g6 c, {. W( P9 o0 P
scanf("%d%d",&n,&m);</P>( q, F/ d6 L' p" z: e5 @
< > while(n>N||n<=0||m>M||m<=0)( z# f9 q# C' Y* K: |5 N1 j: f
{
% T3 s9 V# v2 \ printf(" lease input number of matrix:n(0<n<N),m(0<m<M)again!\n",N,M);
3 }! b* }' I+ {7 j9 A& ~' r) v3 A scanf("%d%d",&n,&m);
, H1 U+ H8 \5 C. E" L9 u }</P>3 J1 C! \3 i/ _8 p' ?# P) y( ]
< > printf(" lease input a filename:\n");
+ b. j: j, R: O7 Y+ q; ? printf("\n");
8 z; e# x3 j4 {: u3 g2 ? scanf("%s",filename);</P>
6 d3 b6 A8 j( y2 K/ b3 F< > if((fa=fopen(filename,"r"))==NULL)
9 z4 Z/ W: t( G2 Q5 `1 e {' w7 i# R+ [* R. [/ H% V0 q! ^
printf("File is not exist.Please creat a file.\n");
* ] G- e- L7 c9 L! V0 a exit(0);
/ v4 H! s! C$ _( R: ~% y3 J }# i P% k6 @$ r! o
/ n" O r. U+ L: f& V8 N- U8 U
while(!feof(fa))/ r9 }/ V+ ~3 R, F
{0 e+ B6 w' x8 B+ q- f
for(i=0;i<m;i++)
5 v& {8 a$ M5 J4 g% D( F5 V! w fscanf(fa,"%f",&a);0 k1 O' e, I6 y, h6 F8 C
printf("%f",a);' Y1 _2 c7 s9 [0 I$ U
}</P>: v7 }! p# j! A; o+ @4 V5 A
< > for (i=0;i<n;i++)
$ [. I) m- A; D: T, g* M7 r for (j=0;j<m;j++)
* R/ ?; h! O4 G! D% C' G if (j==m-1) printf("%15.2f\n",a[i*m+j]);
- ]$ o( j; ^+ V( \ L, R else printf("%15.2f",a[i*m+j]);</P>
. [7 }; } }; v# V< > for(i=0;i<m;i++)
) s0 T. Z1 \# G- ` {
; ?' N# F1 o3 G# J8 c for(j=0;j<n;j++) N6 s- K% P$ i# [9 ~
b+=1.0/n*a[i+j*m];& o n' V/ E) r2 z
}</P># L7 K" B. g; ]2 j% R$ f' M$ V
< >
, c8 A0 m7 {+ I) O/ m1 t5 t3 ^! b fclose(fa);</P>
& i5 {6 }# a0 z9 b< > if((fb=fopen("result.txt","w"))==NULL): A# s7 `& |- d1 J
{
9 c( T( O% _1 X; Q# Z# t) M printf("Result file do not exist.\n");% b- J/ b! C% M! B8 p
exit(0);
7 H8 q' H7 \0 E: j, a8 K+ m, s }</P>
5 v. g8 U% T8 ~0 O# G< > else
& L% S! n/ c5 Y! |+ ~; }, n {, k! v q7 M' \+ \8 n9 z
fprintf(fb,"The average of matrix:\n");* m# t, y0 J( ?
fprintf(fb,"\n");' `+ ?4 A, j1 t; ^" }: T
for(i=0;i<m;i++)
/ G4 J3 q9 Z _8 F5 k# G1 q fprintf(fb,"%15.3f",b);3 Y$ j9 @ x1 Y S$ U' A# J4 }* i
fprintf(fb,"\n");
2 ^. R! \9 t1 ^4 `: z }. z1 O7 K ^5 v3 B8 C+ y
fclose(fb);
" B& ^ z2 K7 { printf("Have done!The result in file:result.txt\n");</P>
. C$ X5 e6 a+ Q< >}</P> |
zan
|