已知在in.dat中存有若干个(个数<200)四位数字的正整数,函数ReadDat读取这若干个正整数并存入

已知在in．dat中存有若干个(个数<200)四位数字的正整数，函数ReadDat读取这若干个正整数并存入数组XX中。请编制函数CalValue，其功能要求： 1．求出该文件中共有多少个正整数totNum； 2．求这些正整数右移1位二进制位后，产生的新数是奇数的数的个数totCnt，以及满足此条件的这些正整数(右移前的值)的算术平均值totPjz。最后main函数调用函数 WriteDat把所求的结果输出到文件out．dat中。 注意：部分源程序存放在test．c文件中。 请勿改动数据文件in．dat中的任何数据，主函数main、读函数ReadDat和输出函数WriteDat的内容。