2006年9月全國(guó)等級(jí)考試三級(jí)c語(yǔ)言上機(jī)題庫(kù)(五十一)

題目51（無(wú)憂id 134 整數(shù)各位打散組合運(yùn)算題）
    沒有提供求素?cái)?shù)函數(shù)isprime() ,可自己編制
    已知數(shù)據(jù)文件IN.DAT中存有200個(gè)四位數(shù)，并已調(diào)用讀函數(shù)readDat()把這些數(shù)存入數(shù)組a中，請(qǐng)考生編制一函數(shù)jsVal()，其功能是：把千位數(shù)字和十位數(shù)字重新組成一個(gè)新的十位數(shù)（新十位數(shù)的十位數(shù)字是原四位數(shù)的千位數(shù)字，新十位數(shù)的個(gè)位數(shù)字是原四位數(shù)的十位數(shù)字），以及把個(gè)位數(shù)字和百位數(shù)字組成另一個(gè)新的十位數(shù)（新十位數(shù)的十位數(shù)字是原四位數(shù)的個(gè)位數(shù)字，新十位數(shù)的個(gè)位數(shù)字是原四位數(shù)的百位數(shù)字），如果新組成的兩個(gè)十位數(shù)均是素?cái)?shù)且新數(shù)的十位數(shù)字均不為零，則將滿足此條件的四位數(shù)按從大到小的順序存入數(shù)組b中，并要計(jì)算滿足上述條件的四位數(shù)的個(gè)數(shù)cnt。最后main()函數(shù)調(diào)用寫函數(shù)writeDat()把結(jié)果cnt以及數(shù)組b中符合條件的四位數(shù)輸出到OUT.DAT文件中。
    注意：部分源程序存在文件prog1.c中。
    程序中已定義數(shù)組：a[200]，b[200]，已定義變量：cnt
    請(qǐng)勿改動(dòng)數(shù)據(jù)文件IN.DAT中的任何數(shù)據(jù)、主函數(shù)main()、讀函數(shù)readDat()和寫函數(shù)writeDat()的內(nèi)容。
    #include
    #define MAX 200
    int a[MAX], b[MAX], cnt = 0 ;
    int isprime(int m)
    {int i;
    for(i=2;i<=m/2;i++)
    if(m%i==0) return 0;
    return 1;
    }
    void jsVal()
    {int i,j,qw,bw,sw,gw;
    int ab,cd;
    for(i=0;i<200;i++)
    {qw=a[i]/1000; bw=a[i]%1000/100;
    sw=a[i]%100/10; gw=a[i]%10;
    ab=10*qw+sw; cd=10*gw+bw;
    if(isprime(ab)&&isprime(cd)&&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("滿足條件的數(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) ;
    }