★题目82
已知数据文件in.dat中存有300个四位数，并已调用读函数readdat()把这些数存入数组a中，请编制一函数jsvalue()，其功能是：求出所有这些四位数是素数的个数cnt，再求出所有满足此条件的四位数平均值pjz1，以及不满足此条件的四位数平均值pjz2，最后调用写函数writedat()把结果cnt,pjz1,pjz2输
出到out.dat文件。
 例如：5591是素数，则该数满足条件计算平均值pjz1，且个数cnt=cnt+1。
 9812是非素数，则该数不满足条件计算平均值pjz2。
 部分源程序存在文件prog1.c中。
 程序中已定义数组：a[300]，已定义变量：cnt,pjz1,pjz2
 请勿改动主函数main()、读函数readdat()和写函数writedat()的内容。
#include 
int a[300],cnt=0;
double pjz1=0.0,pjz2=0.0;

int isp(int m)
{int i;
 
 for(i=2;i if(m%i==0)return 0;
 return 1;
}

jsvalue()
{int i;
 for(i=0;i<300;i++)
 if(isp(a[i])) {pjz1+=a[i];cnt++;}
 else pjz2+=a[i];
 if(cnt==0) pjz1=0;
 else pjz1/=cnt;
 if(300-cnt==0) pjz2=0;
 else pjz2/=(300-cnt);
}

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);
}
