★☆题目76（无忧id 137 整数各位打散组合运算题）

 

已知数据文件IN.DAT中存有200个四位数，并已调用读函数readDat()把这些数存入数组a中，请考生编制一函数jsVal()，其功能是：把个位数字和千位数字重新组成一个新的十位数（新十位数的十位数字是原四位数的个位数字，新十位数的个位数字是原四位数的千位数字），以及把百位数字和十位数字组成另一个新的十位数（新十位数的十位数字是原四位数的百位数字，新十位数的个位数字是原四位数的十位数字），如果新组成的两个十位数必须是一个奇数，另一个为偶数并且两个十位数中至少有一个数能被17整除，同时两个新数的十位数字均不为零，则将满足此条件的四位数按从大到小的顺序存入数组b中，并要计算满足上述条件的四位数的个数cnt。最后main()函数调用写函数writeDat()把结果cnt以及数组b中符合条件的四位数输出到

OUT.DAT文件中。

注意：部分源程序存在文件prog1.c中。

程序中已定义数组：a[200]，b[200]，已定义变量：cnt

请勿改动数据文件IN.DAT中的任何数据、主函数main()、读函数readDat()和写函数writeDat()的内容。

#include <stdio.h>

#define MAX 200

int a[MAX], b[MAX], cnt = 0 ;

 

void jsVal()

{int i,j,thou,hun,ten,data,ab,cd;

for(i=0;i<MAX;i++)

{thou=a[i]/1000; hun=a[i]/100%10;

ten=a[i]%100/10; data=a[i]%10;

ab=10*data+thou; cd=10*hun+ten;

if((ab%2!=cd%2)&&((ab%17==0||cd%17==0)&&ab>=10&&cd>=10))

b[cnt++]=a[i];

}

for(i=0;i<cnt-1;i++)

for(j=i+1;j<cnt;j++)

if(b[i]<b[j]) {data=b[i];b[i]=b[j];b[j]=data;}

}

 

void readDat()

{

int i ;

FILE *fp ;

fp = fopen("in.dat", "r") ;

for(i = 0 ; i < MAX ; i++) fscanf(fp, "%d", &a[i]) ;

fclose(fp) ;

}

 

void main()

{

int i ;

readDat() ;

jsVal() ;

printf("满足条件的数=%d\n", cnt) ;

for(i = 0 ; i < cnt ; i++) printf("%d ", b[i]) ;

printf("\n") ;

writeDat() ;

}

 

writeDat()

{

FILE *fp ;

int i ;

fp = fopen("out.dat", "w") ;

fprintf(fp, "%d\n", cnt) ;

for(i = 0 ; i < cnt ; i++) fprintf(fp, "%d\n", b[i]) ;

fclose(fp) ;

}

下一篇：2006年9月全国等级考试三级c语言上机题库(七十七)