06年9 月计算机等级考试三级C语言上机试题汇总

机试时间：9月23日20：15
机试试题：南开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()的内容。

答案内容：
{int i;
for(i=0;i<300;i++)
    if(isP(a)) {pjz1+=a;cnt++;}
    else pjz2+=a;
if(cnt==0) pjz1=0;
else pjz1/=cnt;
if(300-cnt==0) pjz2=0;
else pjz2/=(300-cnt);
}

试题5：

机试时间：9月24日9：20
机试题目：南开59题。
考号尾数：915

题目59函数jsVal()，其功能是：把千位数字和十位数字重新组成一个新的十位数ab（新十位数的十位数字是原四位数的千位数字，新十位数的个位数字是原四位数的十位数字），以及把个位数字和百位数字组成另一个新的十位数cd（新十位数的十位数字是原四位数的个位数字，新十位数的个位数字是原四位数的百位数字），如果新组成的两个十位数ab<cd，ab必须是奇数且不能被5整除，cd必须是偶数，同时两个新数的十位数字均不为零，则将满足此条件的四位数按从大到小的顺序存入数组b中，并要计算满足上述条件的四位数的个数cnt。
void jsVal()
{int i,thou,hun,ten,data,j;
int ab,cd;
for(i=0;i<MAX;i++)
  {thou=a/1000;  hun=a/100%10;
   ten=a%100/10; data=a%10;
   ab=10*thou+ten;  cd=10*data+hun;   if(((ab-cd)<0&&ab%2==1&&ab%5!=0)&&cd%2!=1&&ab>=10&&cd>=10)
     {b[cnt]=a;cnt++;}  }
for(i=0;i<cnt-1;i++)
   for(j=i+1;j<cnt;j++)
     if(b<b[j]) {data=b;b=b[j];b[j]=data;}}

试题6 ：

机试时间：9月24日9：20
机试题目：南开59题。
考号尾数：915

题目59函数jsVal()，其功能是：把千位数字和十位数字重新组成一个新的十位数ab（新十位数的十位数字是原四位数的千位数字，新十位数的个位数字是原四位数的十位数字），以及把个位数字和百位数字组成另一个新的十位数cd（新十位数的十位数字是原四位数的个位数字，新十位数的个位数字是原四位数的百位数字），如果新组成的两个十位数ab<cd，ab必须是奇数且不能被5整除，cd必须是偶数，同时两个新数的十位数字均不为零，则将满足此条件的四位数按从大到小的顺序存入数组b中，并要计算满足上述条件的四位数的个数cnt。
void jsVal()
{int i,thou,hun,ten,data,j;
int ab,cd;
for(i=0;i<MAX;i++)
  {thou=a/1000;  hun=a/100%10;
   ten=a%100/10; data=a%10;
   ab=10*thou+ten;  cd=10*data+hun;   if(((ab-cd)<0&&ab%2==1&&ab%5!=0)&&cd%2!=1&&ab>=10&&cd>=10)
     {b[cnt]=a;cnt++;}  }
for(i=0;i<cnt-1;i++)
   for(j=i+1;j<cnt;j++)
     if(b<b[j]) {data=b;b=b[j];b[j]=data;}}