2006年9月全國等級考試三級c語言上機題庫(二十九)

★題目29（無憂id 139整數各位打散組合運算題)

 

已知數據檔案in.dat中存有200個四位數，並已調用讀函式readdat()把這些數存入數組a中，請考生編制一函式jsval()，其功能是：把千位數字和十位數字重新組成一個新的十位數ab（新十位數的十位數字是原四位數的千位數字，新十位數的個位數字是原四位數的十位數字），以及把個位數字和百位數字組成另一個新的十位數cd（新十位數的十位數字是原四位數的個位數字，新十位數的個位數字是原四位數的百位數字），如果新組成的兩個十位數ab-cd>=10且ab-cd<=20且兩個數均是偶數，同時兩個新數的十位數字均不為零，則將滿足此條件的四位數按從大到小的順序存入數組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,qw,bw,sw,gw,ab,cd;

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

{ qw=a[i]/1000; bw=a[i]/100%10;

sw=a[i]%100/10; gw=a[i]%10;

ab=qw*10+sw; cd=gw*10+bw;

if(ab-cd>=10&&ab-cd<=20&&ab%2==0&&cd%2==0&&qw!=0&&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;}

}

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) ;

}