1998年9月全国计算机等级考试c语言上机试题含答案.doc

1998年9全国计算机等级考试上机试题含答案/*PROG1 已知在文件IN.DAT中存有若干个（个数200）四位数字的正整数，函数ReadDat()是读取这若干个正整数并存入数组XX中。请编制函数CalValue()，其功能要求：1、求出这文件中共有多少个正整数totNum；、求出这些数中的各位数字之和是偶数的数的个数totCnt，以及满足此条件的这些数的算术平均值totpjZ，最后调用函数WriteDat()把所求的结果输出到文件OUT2.DAT中。注意：部分部分源程序存放在PROG1.C中。请勿改动主函数main()，读数据函数ReacdDat()和输出数据函数WriteDat()的内容。*/#include #include #define MAXNUM 200 int xxMAXNUM ;int totNum = 0 ; /* 文件IN.DAT中共有多少个正整数 */int totCnt = 0 ; /* 符合条件的正整数的个数 */double totPjz = 0.0 ; /* 平均值 */int ReadDat(void) ;void WriteDat(void) ;void CalValue(void) int i;int a,b,c,d;double sum=0;for (i=0;i0)totNum+;a=xxi/1000;b=xxi/100-a*10;c=xxi/10-a*100-b*10;d=xxi%10;if(a+b+c+d)%2=0)totCnt+;sum=sum+xxi;totPjz=sum/totCnt;void main()clrscr() ;if(ReadDat() printf(数据文件IN.DAT不能打开!007n) ;return ;CalValue() ;printf(文件IN.DAT中共有正整数=%d个n, totNum) ;printf(符合条件的正整数的个数=%d个n, totCnt) ;printf(平均值=%.2lfn, 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, &xxi+) ;fclose(fp) ;return 0 ;void WriteDat(void)FILE *fp ;fp = fopen(OUT2.DAT, w) ;fprintf(fp, %dn%dn%.2lfn, totNum, totCnt, totPjz) ;fclose(fp) ;2./*PROG2 已知在文件IN.DAT中存有若干个（个数200）四位数字的正整数，函数ReadDat()是读取这若干个正整数并存入数组XX中。请编制函数CalValue()，其功能要求：1、求出这文件中共有多少个正整数totNum；、求出这些数右移1位后，产生的新数是偶数的数的个数totCnt，以及满足此条件的这些数（右移前的值）的算术平均值totpjZ，最后调用函数WriteDat()把所求的结果输出到文件OUT4.DAT中。注意：部分部分源程序存放在PROG2.C中。请勿改动主函数main()，读数据函数ReacdDat()和输出数据函数WriteDat()的内容。*/#include #include #define MAXNUM 200int xxMAXNUM ;int totNum = 0 ; /* 文件IN.DAT中共有多少个正整数 */int totCnt = 0 ; /* 符合条件的正整数的个数 */double totPjz = 0.0 ; /* 平均值 */int ReadDat(void) ;void WriteDat(void) ;void CalValue(void) int i,s;double sum=0;for (i=0;i0) totNum+;s=xxi;s=s1;if (s%2)=0)totCnt+;sum=sum+xxi;totPjz=sum/totCnt;void main()clrscr() ;if(ReadDat() printf(数据文件IN.DAT不能打开!007n) ;return ;CalValue() ;printf(文件IN.DAT中共有正整数=%d个n, totNum) ;printf(符合条件的正整数的个数=%d个n, totCnt) ;printf(平均值=%.2lfn, 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, &xxi+) ;fclose(fp) ;return 0 ;void WriteDat(void)FILE *fp ;fp = fopen(OUT4.DAT, w) ;fprintf(fp, %dn%dn%.2lfn, totNum, totCnt, totPjz) ;fclose(fp) ;3./*PROG3 已知在文件IN.DAT中存有若干个（个数200）四位数字的正整数，函数ReadDat()是读取这若干个正整数并存入数组XX中。请编制函数CalValue()，其功能要求：1、求出这文件中共有多少个正整数totNum；、求出这些数中的个位数位置上的数字是3.6和9的数的数的个数totCnt，以及满足此条件的这些数的算术平均值totpjZ，最后调用函数WriteDat()把所求的结果输出到文件OUT5.DAT中。注意：部分部分源程序存放在PROG3.C中。请勿改动主函数main()，读数据函数ReacdDat()和输出数据函数WriteDat()的内容。*/#include #include #define MAXNUM 200int xxMAXNUM ;int totNum = 0 ; /* 文件IN.DAT中共有多少个正整数 */int totCnt = 0 ; /* 符合条件的正整数的个数 */double totPjz = 0.0 ; /* 平均值 */int ReadDat(void) ;void WriteDat(void) ;void CalValue(void) int i,gw;double sum=0;for(i=0;i0) totNum+;gw=xxi%10;if(gw=3)|(gw=6)|(gw=9)totCnt+;sum=sum+xxi;totPjz=sum/totCnt;void main()clrscr() ;if(ReadDat() printf(数据文件IN.DAT不能打开!007n) ;return ;CalValue() ;printf(文件IN.DAT中共有正整数=%d个n, totNum) ;printf(符合条件的正整数的个数=%d个n, totCnt) ;printf(平均值=%.2lfn, 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, &xxi+) ;fclose(fp) ;return 0 ;void WriteDat(void)FILE *fp ;fp = fopen(OUT5.DAT, w) ;fprintf(fp, %dn%dn%.2lfn, totNum, totCnt, totPjz) ;fclose(fp) ;4./*PROG4 已知在文件IN.DAT中存有若干个（个数200）四位数字的正整数，函数ReadDat()是读取这若干个正整数并存入数组XX中。请编制函数CalValue()，其功能要求：1、求出这文件中共有多少个正整数totNum；、求出这些数中的千位数位置上的数字大于个位数位置上的数字的数的个数totCnt，以及满足此条件的这些数的算术平均值totpjZ，最后调用函数WriteDat()把所求的结果输出到文件OUT8.DAT中。注意：部分部分源程序存放在PROG4.C中。请勿改动主函数main()，读数据函数ReacdDat()和输出数据函数WriteDat()的内容。*/#include #include #define MAXNUM 200int xxMAXNUM ;int totNum = 0 ; /* 文件IN.DAT中共有多少个正整数 */int totCnt = 0 ; /* 符合条件的正整数的个数 */double totPjz = 0.0 ; /* 平均值 */int ReadDat(void) ;void WriteDat(void) ;void CalValue(void) int i;int qw,gw;double sum=0;for (i=0;i0)totNum+;qw=xxi/1000;gw=xxi%10;if(qwgw)totCnt+;sum=sum+xxi;totPjz=sum/totCnt;void main()clrscr() ;if(ReadDat() printf(数据文件IN.DAT不能打开!007n) ;return ;CalValue() ;printf(文件IN.DAT中共有正整数=%d个n, totNum) ;printf(符合条件的正整数的个数=%d个n, totCnt) ;printf(平均值=%.2lfn, 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, &xxi+) ;fclose(fp) ;return 0 ;void WriteDat(void)FILE *fp ;fp = fopen(OUT8.DAT, w) ;fprintf(fp, %dn%dn%.2lfn, totNum, totCnt, totPjz) ;fclose(fp) ;5./*PROG5 已知在文件IN.DAT中存有若干个（个数200）四位数字的正整数，函数ReadDat()是读取这若干个正整数并存入数组XX中。请编制函数CalValue()，其功能要求：1、求出这文件中共有多少个正整数totNum；、求出这些数中的百位数位置上的数字是1、5和7的数的个数totCnt，以及满足此条件的这些数的算术平均值totpjZ，最后调用函数WriteDat()把所求的结果输出到文件OUT.DAT中。注意：部分部分源程序存放在PROG5.C中。请勿改动主函数main()，读数据函数ReacdDat()和输出数据函数WriteDat()的内容。*/#include #include <conio.h#define MAXNUM 200int xxMAXNUM ;int totNum = 0 ; /* 文件IN.DAT中共有多少个正整数 */int totCnt = 0 ; /* 符合条件的正整数的个数 */double totPjz = 0.0 ; /* 平均值 */int ReadDat(void) ;void WriteDat(void) ;void CalValue(void) int i;int bw,qw;double sum=0;for (i=0;i0)totNum+;qw=xxi/1000;bw=xxi/100-qw*10;if(bw=1)|(bw=5)|(bw=7)totCnt+;sum=sum+xxi;totPjz=sum/totCnt;void main()clrscr() ;if(ReadDat() printf(数据文件IN.DAT不能打开!007n) ;return ;CalValue() ;printf(文件IN.DAT中共有正整数=%d个n, totNum) ;printf(符合条件的正整数的个数=%d个n, totCnt) ;printf(平均值=%.2lfn, 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, &xxi+) ;fclose(fp) ;return 0 ;void WriteDat(void)FILE *fp ;fp = fopen(OUT7.DAT, w) ;fprintf(fp, %dn%dn%.2lfn, totNum, totCnt, totPjz) ;fclose(fp) ;6./*PROG6 已知在文件IN.DAT中存有若干个（个数200）四位数字的正整数，函数ReadDat()是读取这若干个正整数并存入数组XX中。请编制函数CalValue()，其功能要求：1、求出这文件中共有多少个正整数totNum；、求出这些数右移1位后，产生的新数是奇数的数的个数totCnt，以及满足此条件的这些数（右移前的值）的算术平均值totpjZ，最后调用函数WriteDat()把所求的结果输出到文件OUT3.DAT中。注意：部分部分源程序存放在PROG6.C中。请勿改动主函数main()，读数据函数ReacdDat()和输出数据函数WriteDat()的内容。*/#include #include #define MAXNUM 200int xxMAXNUM ;int totNum = 0 ; /* 文件IN.DAT中共有多少个正整数 */int totCnt = 0 ; /* 符合条件的正整数的个数 */double totPjz = 0.0 ; /* 平均值 */int ReadDat(void) ;void WriteDat(void) ;void CalValue(void)int i,s;double sum=0;for (i=0;i0)totNum+;s=xxi;s=s1;if(s%2)=0)totCnt+;sum=sum+xxi;totPjz=sum/totCnt;void main()clrscr() ;if(ReadDat() printf(数据文件IN.DAT不能打开!007n) ;return ;CalValue() ;printf(文件IN.DAT中共有正整数=%d个n, totNum) ;printf(符合条件的正整数的个数=%d个n, totCnt) ;printf(平均值=%.2lfn, 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, &xxi+) ;fclose(fp) ;return 0 ;void WriteDat(void)FILE *fp ;fp = fopen(OUT3.DAT, w) ;fprintf(fp, %dn%dn%.2lfn, totNum, totCnt, totPjz) ;fclose(fp) ;7./*PROG7 已知在文件IN.DAT中存有若干个（个数200）四位数字的正整数，函数ReadDat()是读取这若干个正整数并存入数组XX中。请编制函数CalValue()，其功能要求：1、求出这文件中共有多少个正整数totNum；、求出这些数中的百位数位置上的数字小于十位数位置上的数字的数的个数totCnt，以及满足此条件的这些数的算术平均值totpjZ，最后调用函数WriteDat()把所求的结果输出到文件OUT9.DAT中。注意：部分部分源程序存放在PROG7.C中。请勿改动主函数main()，读数据函数ReacdDat()和输出数据函数WriteDat()的内容。*/#include #include #define MAXNUM 200int xxMAXNUM ;int totNum = 0 ; /* 文件IN.DAT中共有多少个正整数 */int totCnt = 0 ; /* 符合条件的正整数的个数 */double totPjz = 0.0 ; /* 平均值 */ss=mycssint ReadDat(void) ;void WriteDat(void) ;void CalValue(void)int qw,bw,sw;int i;double sum=0;for (i=0;i0)totNum+;qw=xxi/1000;bw=xxi/100-qw*10;sw=xxi/10-qw*100-bw*10;if (bwsw)totCnt+;sum+=xxi;totPjz=sum/totCnt;void main()clrscr() ;if(ReadDat() printf(数据文件IN.DAT不能打开!007n) ;return ;CalValue() ;printf(文件IN.DAT中共有正整数=%d个n, totNum) ;printf(符合条件的正整数的个数=%d个n, totCnt) ;printf(平均值=%.2lfn, 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, &xxi+) ;fclose(fp) ;return 0 ;void WriteDat(void)FILE *fp ;fp = fopen(OUT9.DAT, w) ;fprintf(fp, %dn%dn%.2lfn, totNum, totCnt, totPjz) ;fclose(fp) ;8./*PROG8 已知在文件IN.DAT中存有若干个（个数200）四位数字的正整数，函数ReadDat()是读取这若干个正整数并存入数组XX中。请编制函数CalValue()，其功能要求：1、求出这文件中共有多少个正整数totNum；、求出这些数中的十位数位置上的数字是2、4和8的数的个数totCnt，以及满足此条件的这些数的算术平均值totpjZ，最后调用函数WriteDat()把所求的结果输出到文件OUT6.DAT中。注意：部分部分源程序存放在PROG8.C中。请勿改动主函数main()，读数据函数ReacdDat()和输出数据函数WriteDat()的内容。*/#include #include #define MAXNUM 200int xxMAXNUM ;int totNum = 0 ; /* 文件IN.DAT中共有多少个正整数 */int totCnt = 0 ; /* 符合条件的正整数的个数 */double totPjz = 0.0 ; /* 平均值 */int ReadDat(void) ;void WriteDat(void) ;s=black1void CalValue(void) int i,qw,bw,sw;double sum=0;for (i=0;i0)totNum+;qw=xxi/1000;bw=xxi/100-qw*10;sw=xxi/10-qw*100-bw*10;if (sw=2)|(sw=4)|(sw=8)totCnt+;sum=sum+xxi;totPjz = sum / totCnt;void main()clrscr() ;if(ReadDat() printf(数据文件IN.DAT不能打开!007n) ;return ;CalValue() ;printf(文件IN.DAT中共有正整数=%d个n, totNum) ;printf(符合条件的正整数的个数=%d个n, totCnt) ;printf(平均值=%.2lfn, 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, &xxi+) ;fclose(fp) ;return 0 ;void WriteDat(void)FILE *fp ;fp = fopen(OUT6.DAT, w) ;fprintf(fp, %dn%dn%.2lfn, totNum, totCnt, totPjz) ;fclose(fp) ;9./*PROG9 已知在文件IN.DAT中存有若干个（个数200）四位数字的正整数，函数ReadDat()是读取这若干个正整数并存入数组XX中。请编制函数CalValue()，其功能要求：1、求出这文件中共有多少个正整数totNum；、求出这些数中的千位数位置上的数字与十位数位置上的数字均为奇数的数的个数totCnt，以及满足此条件的这些数的算术平均值totpjZ，最后调用函数WriteDat()把所求的结果输出到文件OUT10.DAT中。注意：部分部分源程序存放在PROG9.C中。 请勿改动主函数main()，读数据函数ReacdDat()和输出数据函数WriteDat()的内容。*/#include #include #define MAXNUM 200int xxMAXNUM ;int totNum = 0 ; /* 文件IN.DAT中共有多少个正整数 */int totCnt = 0 ; /* 符合条件的正整数的个数 */double totPjz = 0.0 ; /* 平均值 */int ReadDat(void) ;void WriteDat(void) ;void CalValue(void) int i,qw,bw,sw;double sum=0;for (i=0;i0)totNum+;qw=xxi/1000;bw=xxi/100-qw*10;sw=xxi/10-qw*100-bw*10;if (qw%2)=0) & (sw%2)=0)totCnt+;sum=sum+xxi;totPjz = sum / totCnt;void main()clrscr() ;if(ReadDat() printf(数据文件IN.DAT不能打开!007n) ;return ;CalValue() ;printf(文件IN.DAT中共有正整数=%d个n, totNum) ;printf(符合条件的正整数的个数=%d个n, totCnt) ;printf(平均值=%.2lfn, 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, &xxi+) ;fclose(fp) ;return 0 ;void WriteDat(void)FILE *fp ;fp = fopen(OUT10.DAT, w) ;fprintf(fp, %dn%dn%.2lfn, totNum, totCnt, totPjz) ;fclose(fp) ;10./*PROG10 已知在文件IN.DAT中存有若干个（个数200）四位数字的正整数，函数ReadDat()是读取这若干个正整数并存入数组XX中。请编制函数CalValue()，其功能要求：1、求出这文件中共有多少个正整数totNum；、求出这些数中的各位数字之和是奇数的数的个数totCnt，以及满足此条件的这些数的算术平均值totpjZ，最后调用函数WriteDat()把所求的结果输出到文件OUT1.DAT中。注意：部分部分源程序存放在PROG10.C中。请勿改动主函数main()，读数据函数ReacdDat()和输出数据函数WriteDat()的内容。*/#include #include #define MAXNUM 200int xxMAXNUM ;int totNum = 0 ; /* 文件IN.DAT中共有多少个正整数 */int totCnt = 0 ; /* 符合条件的正整数的个数 */double totPjz = 0.0 ; /* 平均值 */int ReadDat(void) ;void WriteDat(void) ;void CalValue(void) int i;int qw,bw,sw,gw;double sum=0;for ( i=0 ; i 0)totNum + ;qw = xxi/ 1000;bw = xxi / 100 - qw * 10;sw = xxi / 10 - qw * 100- bw * 10;gw = xxi % 10;if ( ( (qw+bw+sw+gw) % 2)!=0)totCnt + ;sum = sum + xxi;totPjz = sum / totCnt;void main()clrscr() ;if(ReadDat() printf(数据文件IN.DAT不能打开!007n) ;return ;CalValue() ;printf(文件IN.DAT中共有正整数=%d个n, totNum) ;printf(符合条件的正整数的个数=%d个n, totCnt) ;printf(平均值=%.2lfn, 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, &xxi+) ;fclose(fp) ;return 0 ;void WriteDat(void)FILE *fp ;fp = fopen(OUT1.DAT, w) ;fprintf(fp, %dn%dn%.2lfn, totNum, totCnt, totPjz) ;fclose(fp) ;2000年9月全真试题1./* 程序PROG1.C的功能是：选出100至1000之间所有个位数字与十位数字之和被10除所得余数恰是百位数字的素数（如293）。计算并输出上述这些素数的个数cnt以及这些素数值的和sum。请考生编写函数countValue( )实现程序的要求，最后调用函数writeDAT( )把结果cnt和sum输出到文件out6.DAT中。注意：部分源程序存放在PROG1.C中。请勿改动主函数main( )和输出数据函数writeDAT( )的内容。 */#include int cnt, sum ;void countValue()void main()cnt = sum = 0 ;countValue() ;printf(素数的个数=%dn, cnt) ;printf(满足条件素数值的和=%d, sum) ;writeDAT() ;SPANwriteDAT()FILE *fp ;fp = fopen(OUT6.DAT, w) ;fprintf(fp, %dn%dn, cnt, sum) ;fclose(fp) ;2. /* 编写函数sumValue( )，它的功能是：计算正整数n的所有因子(1和n除外)之和作为函数值返回。例如：n=20时，函数值为21。函数ReadWrite( )是实现从文件in9.dat中读取两个字符串，并调用函数sumValue()，最后把结果输出到文件out9.dat中。注意：部分源程序存在文件PROG1.C中，请勿改动主函数main()和其它函数中的任何内容，仅在函数sumValue()的花括号中填入你编写的若干语句。 */#include #include int sumValue(int n)main() clrscr() ;printf(%dn, sumValue(20) ;ReadWrite() ;ReadWrite()FILE *fp, *wf ;int i, n, s ;fp = fopen(in9.dat,r) ;if(fp = NULL) printf(数据文件in9.dat不存在!) ;return ;wf = fopen(out9.dat,w) ;for(i = 0 ; i 10 ; i+) fscanf(fp, %d, &n) ;s = sumValue(n) ;fprintf(wf, %dn, s) ;fclose(fp) ;fclose(wf) ;3./* 请编写一个函数changeStr(char *s)，函数的功能是把s串中所有的字母改写成该字母的下一个字母，字母z改写成字母a。大写仍为大写字母，小写字母仍为小写字母，其它的字符不变。函数ReadWrite()实现从文件in2.dat中读取两个字符串，并调用函数changestr(),最后把结果输出到文件out2.dat中。注意：部分源程序存在文件PROG1.C中。请勿改动主函数main()和其它函数中的任何内容，仅在函数changeStr()的花括号中填入你编写的若干语名。*/#include #include #include #include #define N 81changeStr ( char *s )main( )char aN ;clrscr( ) ;printf ( Enter a string : ) ; gets ( a ) ;printf ( The original string is : ) ; puts( a ) ;changeStr ( a ) ;printf ( The string after modified : ) ;puts ( a ) ;ReadWrite( ) ;ReadWrite( )int i ;char aN ;FILE *rf, *wf ;rf = fopen(in2.dat, r) ;wf = fopen(out2.dat, w) ;for(i = 0 ; i 10 ; i+) fscanf(rf, %s, a) ;changeStr(a) ;fprintf(wf, %sn, a) ;fclose(rf) ;fclose(wf) ;4./* 程序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(实根=%fn, countValue();printf( %fn,cos(countValue()-countValue();writeDAT();writeDAT()FILE *wf ;wf=fopen(out4.dat,w) ;fprintf(wf, %fn, countValue() ;fclose(wf) ;5./* 已知在文件IN.DAT中存有若干个（个数200）四位数字的正整数，函数ReadDAT()读取这些正整数并存入数组xx中。请编制函数CalValue()其功能要求是：1.求出这个文件中共有多少个正整数totNum；2.求出这些数中的各位数字之和是奇数的数的个数totCnt,以及不满足此条件的所有数的算术平均值totPjz，最后调用函数WriteDAT()把所求的结果输出到文件OUT8.DAT中。注意：部分源程序存放在PROG1.C中。请勿改动主函数main()，读数据函数ReadDAT()和输出数据函数WriteDAT()的内容。 */#include #include #define MAXNUM 200int xxMAXNUM ;int totNum = 0 ; /* 文件IN.DAT中共有多少个正整数 */int totCnt = 0 ; /* 符合条件的正整数的个数 */double totPjz = 0.0 ; /* 平均值 */Nint ReadDat(void) ;void WriteDat(void) ;void CalValue(void)void main()clrscr() ;if(ReadDat() printf(数据文件IN.DAT不能打开!007n) ;return ;CalValue() ;printf(文件IN.DAT中共有正整数=%d个n, totNum) ;printf(符合条件的正整数的个数=%d个n, totCnt) ;printf(平均值=%.2lfn, 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, &xxi+) ;fclose(fp) ;return 0 ;void WriteDat(void)FILE *fp ;fp = fopen(OUT8.DAT, w) ;fprintf(fp, %dn%dn%.2lfn, totNum, totCnt, totPjz) ;fclose(fp) ;6./* 编写一个函数findstr()，该函数统计一个长度为2的子字符串在另一个字符串中出现的次数。例如，假定输入的字符串为“asd asasdfg asd as zx67 asd mklo”，子字符串为“as”，则输出6。函数ReadWrite()实现从文件in1.dat中读取两个字符串，并调用函数findStr()，最后把结果输出到文件out1.dat中。注意：部分源程序存在文件PROG1.C中。请勿改动主函数main()和其它函数中的任何内容，仅在函数findStr()的花括号中填入你编写的若干语句。*/#include #include #include int findStr(cha