14./* 程序PROG1.C的功能是：利用以下所示的简单迭代方法求方程： 
cos(x)-x=0的一个实根。 
Xn+1=cos(Xn) 
迭代步骤如下： 
　　(1) 取x1初步值为0.0； 
　　(2) x0=x1，把x1，把x1的值赋给x0； 
　　(3) x1=cos(x0)，求出一个新的x1； 
　　(4) 若x0-x1的绝对值小于0.000001，执行步骤(5)，否则执行步骤(2)； 
　　(5) 所求x1就是方程cos(x)-x=0的一个实根，作为函数值返回。 
　　请编写函数countValue()实现程序的要求，最后调用函数writeDAT()把结果输出到文件out4.dat中。 
　　注意：部分源程序存在文件PROG1.C中，请勿改动主函数main()和输出数据函数WriteDAT()的内容。 */ 
#include  
#include  
#include  
float countValue() 
{ 
} 
main() 
{ 
clrscr(); 
printf("实根=%f/n", countValue()); 
printf(" %f/n",cos(countValue())-countValue()); 
writeDAT(); 
} 
writeDAT() 
{ 
FILE *wf ; 
wf=fopen("out4.dat","w") ; 
fprintf(wf, "%f/n", countValue()) ; 
fclose(wf) ; 
} 

15./* 已知在文件IN.DAT中存有若干个（个数<200）四位数字的正整数，函数ReadDAT()读取这些正整数并存入数组xx中。请编制函数CalValue()其功能要求是：

1.求出这个文件中共有多少个正整数totNum；2.求出这些数中的各位数字之和是奇数的数的个数totCnt,以及不满足此条件的所有数的算术平均值totPjz，最后调用函数WriteDAT()把所求的结果输出到文件OUT8.DAT中。 
　　注意：部分源程序存放在PROG1.C中。 
　　请勿改动主函数main()，读数据函数ReadDAT()和输出数据函数WriteDAT()的内容。 */ 
#include  
#include  
#define MAXNUM 200 
int xx[MAXNUM] ; 
int totNum = 0 ; /* 文件IN.DAT中共有多少个正整数 */ 
int totCnt = 0 ; /* 符合条件的正整数的个数 */ 
double totPjz = 0.0 ; /* 平均值 */ 
int ReadDat(void) ; 
void WriteDat(void) ; 
void CalValue(void) 
{ 
} 
void main() 
{ 
clrscr() ; 
if(ReadDat()) { 
printf("数据文件IN.DAT不能打开!/007/n") ; 
return ; 
} 
CalValue() ; 
printf("文件IN.DAT中共有正整数=%d个/n", totNum) ; 
printf("符合条件的正整数的个数=%d个/n", totCnt) ; 
printf("平均值=%.2lf/n", totPjz) ; 
WriteDat() ; 
} 
int ReadDat(void) 
{ 
FILE *fp ; 
int i = 0 ; 
if((fp = fopen("in.dat", "r")) == NULL) return 1 ; 
while(!feof(fp)) { 
fscanf(fp, "%d,", &xx[i++]) ; 
} 
fclose(fp) ; 
return 0 ; 
} 
void WriteDat(void) 
{ 
FILE *fp ; 
fp = fopen("OUT8.DAT", "w") ; 
fprintf(fp, "%d/n%d/n%.2lf/n", totNum, totCnt, totPjz) ; 
fclose(fp) ; 
} 

上一页1234下一页