★題目28（無憂id 138整數(shù)各位打散組合運算題)

 

已知數(shù)據(jù)文件in.dat中存有200個四位數(shù)，并已調(diào)用讀函數(shù)readdat()把這些數(shù)存入數(shù)組a中，請考生編制一函數(shù)jsval()，其功能是：把千位數(shù)字和十位數(shù)字重新組成一個新的十位數(shù)ab（新十位數(shù)的十位數(shù)字是原四位數(shù)的千位數(shù)字，新十位數(shù)的個位數(shù)字是原四位數(shù)的十位數(shù)字），以及把個位數(shù)字和百位數(shù)字組成另一個新的十位數(shù)cd（新十位數(shù)的十位數(shù)字是原四位數(shù)的個位數(shù)字，新十位數(shù)的個位數(shù)字是原四位數(shù)的百位數(shù)字），如果新組成的兩個十位數(shù)ab-cd>=0且ab-cd<=10且兩個數(shù)均是奇數(shù)，同時兩個新數(shù)的十位數(shù)字均不為零，則將滿足此條件的四位數(shù)按從大到小的順序存入數(shù)組b中，并要計算滿足上述條件的四位數(shù)的個數(shù)cnt。最后main()函數(shù)調(diào)用寫函數(shù)writedat( )把結(jié)果cnt以及數(shù)組b中符合條件的四位數(shù)輸出到out.dat文件中。

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

程序中已定義數(shù)組：a[200]，b[200]，已定義變量：cnt

請勿改動數(shù)據(jù)文件in.dat中的任何數(shù)據(jù)、主函數(shù)main()、讀函數(shù)readdat()和寫函數(shù)writedat()的內(nèi)容。

#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<200;i++)

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

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

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

if((ab-cd)>=0&&(ab-cd)<=10&&ab%2==1&&cd%2==1&&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]) {thou=b[i]; b[i]=b[j];b[j]=thou;}

}

 

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("滿足條件的數(shù)=%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) ;

}