全國計算機等級考試二級C語言上機題52

字號:

題目52
    已知數據文件in.dat中存有200個四位數,并已調用讀函數readdat()把這些數存入數組a中,請考生編制一函數jsval(),其功能是:把千位數字和個位數字重新組成一個新的十位數(新十位數的十位數字是原四位數的千位數字,新十位數的個位數字是原四位數的個位數字),以及把百位數字和十位數字組成另一個新的十位數(新十位數的十位數字是原四位數的百位數字,新十位數的個位數字是原四位數的十位數字),如果新組成的兩個十位數均是奇數并且兩個十位數中至少有一個數能被5整除,同時兩個新數的十位數字均不為零,則將滿足此條件的四位數按從大到小的順序存入數組b中,并要計算滿足上述條件的四位數的個數cnt。最后main()函數調用寫函數writedat( )把結果cnt以及數組b中符合條件的四位數輸出到out.dat文件中。
     注意:部分源程序存在文件prog1.c中。
     程序中已定義數組:a[200],b[200],已定義變量:cnt
     請勿改動數據文件in.dat中的任何數據、主函數main()、讀函數readdat()和寫函數writedat()的內容。
    
    #include
    #define max 200
    int a[max], b[max], cnt = 0 ;
    
    void jsval()
    {int i,thou,hun,ten,data,j;
     int ab,cd;
     for(i=0;i {thou=a[i]/1000; hun=a[i]%1000/100;
     ten=a[i]%100/10; data=a[i]%10;
     ab=10*thou+data; cd=10*hun+ten;
     if(ab%2&&cd%2&&(ab%5==0||cd%5==0)&&ab>=10&&cd>=10) b[cnt++]=a[i];
     }
     for(i=0;i for(j=i+1;j if(b[i]}
    
    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) ;