简答题：已知在in．dat中存有若干个(个数<200)四位数字的正整数，函数ReadDat()读取这若干个正整数并存入数组XX中

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