 ☆题目81
已知数据文件in.dat中存有300个四位数，并已调用读函数readdat()把这些数存入数组a中，请编制一函数jsvalue()，其功能是：求出千位数上的数加百位数等于十位数上的数加个位数上的数的个数cnt，再求出所有满足此条件的四位数平均值pjz1，以及不满足此条件的四位数平均值pjz2，最后调用写函数writedat()把结果输出到out.dat文件。
 例如：7153,7+1=5+3，则该数满足条件计算平均值pjz1，且个数cnt=cnt+1。8129,8+1<>2+9,则该数不满足条件计算平均值pjz2。
 部分源程序存在文件prog1.c中。
 程序中已定义数组：a[300]，已定义变量：cnt,pjz1,pjz2。
 请勿改动主函数main()、读函数readdat()和写函数writedat()的内容。
#include 
int a[300],cnt=0;
double pjz1=0.0,pjz2=0.0;

jsvalue()
{int i,thou,hun,ten,data,n=0;
 for(i=0;i<300;i++)
 {thou=a[i]/1000; hun=a[i]%1000/100;
 ten=a[i]%100/10; data=a[i]%10;
 if(thou+hun==ten+data) {cnt++;pjz1+=a[i];}
 else {n++;pjz2+=a[i];}
 }
 if(cnt==0) pjz1=0;
 else pjz1/=cnt;
 if(n==0) pjz2=0;
 else pjz2/=n;
}

main()
{
 int i;

 readdat();
 jsvalue();
 writedat();
 printf("cnt=%d 满足条件的平均值pzj1=%7.2f 不满足条件的平均值pzj2=%7.2f ",cnt,pjz1,pjz2);
}

readdat()
{
 file *fp;
 int i;
 fp=fopen("in.dat","r");
 for(i=0;i<300;i++)fscanf(fp,"%d,",&a[i]);
 fclose(fp);
}

writedat()
{
 file *fp;
 int i;
 fp=fopen("out.dat","w");
 fprintf(fp,"%d %7.2f %7.2f ",cnt,pjz1,pjz2);
 fclose(fp);
}