2012年计算机三级网络技术考试上机练习题7

题目19（整数统计运算题） 
请编制程序prog1.c，从文件in.dat中读取200个整数至数组xx中，求出奇数的个数cnt1和偶数的个数cnt2以及数组xx中值为偶数的算术平均值pj（保留2位小数）。 
    结果cnt1,cnt2,pj输出到out.dat中。 
    
cnt1=0;  cnt2=0;  pj=0.0; 
 for(m=0;m<N;m++) 
   if(xx[m]%2) cnt1++; 
   else { cnt2++; pj+=xx[m];} 
 if(cnt2==0) pj=0; 
 else pj/=cnt2;  
  
题目20（整数各位数字运算题) 
已知数据文件in.dat中存有300个四位数，并已调用读函数ReadDat()把这些数存入数组a中，请编制一函数jsValue()，其功能是：求出千位数上的数减百位数上的数减十位数上的数减个位数上的数大于零的个数cnt，再把所有满足此条件的四位数依次存入数组b中，然后对数组b的四位数按从小到大的顺序进行排序，最后调用写函数writeDat()把结果输出到out.dat文件。 
    例如：9123，9-1-2-3>0，则该数满足条件存入数组b中，且个数cnt=cnt+1。 
          9812，9-8-1-2>0，则该数不满足条件忽略。 
    jsValue() 
{ int i,j,qw,bw,sw,gw; 
  for(i=0;i<300;i++) 
   { qw=a[i]/1000;   bw=a[i]/100%10; 
     sw=a[i]%100/10; gw=a[i]%10; 
     if(qw-bw-sw-gw>0) b[cnt++]=a[i]; 
   } 
  for(i=0;i<cnt-1;i++) 
   for(j=i+1;j<cnt;j++) 
     if( b[i]>b[j]) { qw=b[i]; b[i]=b[j]; b[j]=qw;} 
} 

题目21（整数各位数字运算题 ） 
已知数据文件in.dat中存有300个四位数，并已调用读函数ReadDat()把这些数存入数组a中，请编制一函数jsValue()，其功能是：求出千位数上的数加个位数上的数等于百位数上的数加十位数上的数的个数cnt，再把所有满足此条件的四位数依次存入数组b中，然后对数组b的四位数按从小到大的顺序进行排序，最后调用写函数writeDat()把结果输出到out.dat文件。 
    例如：6712，6+2=7+1，则该数满足条件存入数组b中，且个数cnt=cnt+1。 
          8129，8+9<>1+2，则该数不满足条件忽略 
  
jsValue() 
{int i,qw,bw,sw,gw,j; 
 for(i=0;i<300;i++) 
 {qw=a[i]/1000;    bw=a[i]%1000/100; 
  sw=a[i]%100/10;  gw=a[i]%10; 
  if(qw+gw==bw+sw) b[cnt++]=a[i]; 
 } 
 for(i=0;i<cnt-1;i++) 
  for(j=i+1;j<cnt;j++) 
   if(b[i]>b[j]) {qw=b[i]; b[i]=b[j]; b[j]=qw;} 
}