请编制程序，要求：将文件IN91.DAT中的200个整数读入数组xx中，求出数组xx中奇数的个数cnt1和偶数的个数cnt2，以及数组xx下标为偶数的元素值的算术平均值pj(保留2位小数)，结果cnt1，cnt2，pj输出到out91.dat中。
部分程序、读函数read_dat(int xx[200])及输出格式已给出。
试题程序：
#include＜conio.h＞
#include＜stdio.h＞
#define N 200
void read_dat (int xx[N])
int i,j;
FILE *fp;
fp=fopen ("IN91.DAT", "r");
for (i=0;i＜20;i++)
for (j=0; j＜10; j++)
fscanf (fp, "%d, ", &xx [i*10+j]);
printf ("%d", xx [i*10+j]);
printf ("\n");
fclose (fp);
void main ()
int cnt1,cnt2,xx[N];
float pj;
FILE *fw;
int i, k=0;
long j;
clrscr ();
fw=fopen ("out91.dat", "w");
read_dat (xx);
printf ("\n\ncnt1=%d, cnt2=%d,pj=%6.2f\n", cnt1, cnt2, pj);
fprintf (fw, "%d\n%d\n%6.2f\n", cnt1, cnt2,pj);
fclose (fw);