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

题目22（整数各位数字运算题 ）
已知数据文件in.dat中存有300个四位数，并已调用读函数ReadDat()把这些数存入数组a中，请编制一函数jsValue()，其功能是：求出千位数上的数减百位数减十位数上的数减个位数上的数大于零的个数cnt，再求出所有满足此条件的四位数平均值pjz1，以及不满足此条件的四位数平均值pjz2，最后调用写函数writeDat()把结果输出到out.dat文件。
   例如：9123,9-1-2-3>0，则该数满足条件计算平均值pjz1，且个数cnt=cnt+1。9812,9-8-1-2<0,则该数不满足条件计算平均值pjz2。
   jsValue()
{int i,qw,bw,sw,gw,n=0;
 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-bw-sw-gw>0) {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;
} 

题目23（整数各位数字运算题）
已知数据文件in.dat中存有300个四位数，并已调用读函数ReadDat()把这些数存入数组a中，请编制一函数jsValue()，其功能是：求出千位数上的数减百位数上的数减十位数上的数减个位数上的数大于零的个数cnt，再把所有满足此条件的四位数依次存入数组b中，然后对数组b的四位数按从小到大的顺序进行排序，最后调用写函数writeDat()把结果输出到out.dat文件。
    例如：9123，9-1-2-3>0，则该数满足条件存入数组b中，且个数cnt=cnt+1。
    
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;}
} 
 
题目24（整数各位数字运算题）
下列程序的功能是：选出5000以下符合条件的自然数。条件是：千位数字与百位数字之和等于十位数字与个位数字之和，且千位数字与百位数字之和等于个位数字与千位数字之差的10倍。计算并输出这些四位自然数的个数cnt以及这些数的和sum。请编写函数countValue()实现程序的要求，最后调用函数writeDat()把结果cnt和sum，输出到文件OUT13.DAT中。
   
void countValue()
{int i,thou,hun,ten,data;
 for(i=1000;i<5000;i++)
 { thou=i/1000;    hun=i%1000/100;
   ten=i%100/10;  data=i%10;
  if(thou+hun==ten+data&&thou+hun==(data-thou)*10) {cnt++;sum+=i;}
  }
}