染雾已知在文件IN.DAT中存有若干个数（个数<200）四位数字的正整数，函数ReadDat()是读取这若干个正整数并存入数组xx中。请编制函数CalValue()，其功能要求：1.求出这文件中共有多少个正整数to
1999年秋四级上机试题第九套试题
程序设计考试题（100分）
已知在文件IN.DAT中存有若干个数（个数<200）四位数字的正整数，函数ReadDat()是读取这若干个正整数并存入数组xx中。请编制函数CalValue()，其功能要求：1.求出这文件中共有多少个正整数to
