请编制程序，要求：将文件IN91．DAT中的200个整数读入数组xx中，求出数组xx中奇数的个数cnt1和偶数的个数cnt2，以及数组xx下标为偶数的元素值的算术平均值pj(保留2位小数)，结果cnt1，cnt2，由输出到out91.dat中。
部分程序、读函数read_dat(int xx[200])及输出格式已给出。
试题程序：
#include＜conio．h＞
#include＜stdio．h＞
#define N 200
void realdat(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\ncntl=%d, cnt2=%d,pj=%6.2f\n",cnt1,cnt2,pj);
fprintf(fw,"%d\n%d\n%6.2f\n",cntl,cnt2,pj);
fclose(fw);
