- 在线时间
- 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>. t2 T! G# ?, e( J1 C
< >#include<stdio.h>
0 r1 e' d6 m# j; G- a O#define N 100
2 f3 ^- [: O. E' T! _+ k4 A8 D#define M 20</P>& D0 S8 J( {/ y" f+ C9 L
< >void main()- n* _. N! B- |$ |) S4 ~
{
; U" s9 ^7 @) M$ a FILE *fa,*fb;- y- ]$ }4 X) t4 P
char filename[30];% s0 s* ?3 q0 B4 k1 g- ^
int n,m,i,j;
* ]3 m ~& O& T/ I4 h$ l* z double a[N*M]={0.0},b[M]={0.0};</P>
2 T4 U7 ^: C* Q" _2 p z5 a< > printf(" lease input the number of columns and lines of matrix:n,m\n",N,M);
) K! h$ c6 V5 l' w, C7 h& f scanf("%d%d",&n,&m);</P>
5 j7 R N1 F: |; R< > while(n>N||n<=0||m>M||m<=0)
0 b: K8 L" d6 H& }. T2 J. H! _ {/ {) G0 }' k4 c6 @& q0 i
printf(" lease input number of matrix:n(0<n<N),m(0<m<M)again!\n",N,M);" L' P' }/ n8 a9 w" }# T
scanf("%d%d",&n,&m);' }9 o _ a* A% v
}</P>
* ]. M( }5 \! }* x. S) h< > printf(" lease input a filename:\n");
3 T' P, f8 I) K& [% o6 X. H printf("\n");
$ y/ k, @( X2 G2 C1 b scanf("%s",filename);</P>; E0 E3 c% }9 X$ J r
< > if((fa=fopen(filename,"r"))==NULL)" p, e, {# T# o5 J7 S
{2 E, A) K8 m; x
printf("File is not exist.Please creat a file.\n");
2 W9 B* l3 O5 z! N6 V- t7 A exit(0);
, }1 f+ S7 z- w }
J: j( u+ A) Z+ i1 z4 X : r$ J7 J5 ?/ W
while(!feof(fa))5 j0 B9 z" h( m( v, F, G
{! a/ H) l% B) ]( {
for(i=0;i<m;i++)
7 ?8 M4 F; j0 y" m fscanf(fa,"%f",&a);
2 Y. I# k8 D. \. U" R printf("%f",a);9 W X6 ?: m# j4 {# `5 j2 W
}</P>, T$ M7 T8 i, j- H, @
< > for (i=0;i<n;i++), u* D. U* a+ _/ c: E
for (j=0;j<m;j++)3 `8 Y4 I: c R4 m# ^
if (j==m-1) printf("%15.2f\n",a[i*m+j]);4 c! L! Z3 x b" o
else printf("%15.2f",a[i*m+j]);</P>
' R$ _! @: Q s0 M< > for(i=0;i<m;i++)
% b* ^% q& l* R4 U4 B7 \; ] {" `3 t; D$ u. g" Q! w# r* j
for(j=0;j<n;j++)
# X* J7 Y3 m& z$ P2 m4 J4 b: B/ Z+ M b+=1.0/n*a[i+j*m];- t6 \# b* L; G) D% A2 A) [- x
}</P>
T8 T$ @8 }" m" a* q- G6 @ _< >
& q; }1 i5 }5 ~) U' q: r+ y; i fclose(fa);</P>/ Q' d. e: W7 o" [; C( s& E( T' F; r
< > if((fb=fopen("result.txt","w"))==NULL)
# O" H$ ~; [5 T; y {. o1 h) ? B* D5 f4 [
printf("Result file do not exist.\n");; N9 B0 W. D3 m! z& U
exit(0);
! V8 H" q; E: ]: m- h1 [/ s }</P>7 D/ c- ?' J! \
< > else4 t' Z0 w7 `* V0 E1 ~; \( a1 x# Q
{5 G- M# `. R( q) M- n/ A
fprintf(fb,"The average of matrix:\n");
+ K: I- v7 ~ k$ J( d fprintf(fb,"\n");* S/ e% x5 Y) R0 G u
for(i=0;i<m;i++)
( P' F, H6 }% t- \& e! O fprintf(fb,"%15.3f",b);9 V; f3 }6 B. X I! o3 N$ [
fprintf(fb,"\n");
% }: }& b& U8 j7 a }
. ^4 r L/ H+ O3 ^# n R fclose(fb);
" M& a& d) T+ Y: Q# P printf("Have done!The result in file:result.txt\n");</P>
+ {0 G& j- ?) N7 _< >}</P> |
zan
|