【導讀】題目1：下列程序的功能是：將大于整數m且緊靠m的k個素數存入數組xx。k,intxx[])實現函數的要求，最后調用函數readwriteDAT()把結果輸出到文件。題目2：已知數據文件200個四位數,并已調用讀函數readDat()把這些數存入數組a中,writeDat()把結果t以及數組b中符合條件的四位數輸出到。數StrOL(),其函數的功能是:以行為單位對行中以空格或標點符號為分隔的所有單詞進行倒排，除標點符號，之后把已處理的字符串仍按行重新存入字符串數組xx中。題目6：在文件200個正整數，且每個數均在1000至9999之間。請編制函數jsSort()，其函數的功能是：要求按每個數的后三位的大小進行。數值進行升序排列。

　　

【正文】 I]。sell[I]=sell[j]。sell[j]=xy。} } 題目 48：已知數據文件 存有 300個四位數 ,并已調用讀函數 READDAT()把這些數存入數組 A中 .請編制一函數 SVALUE(),其功能是 :求出千位數上的數加個位數上的數等于百位數上的數加十位數上的數的個數 CNT,再把所有滿足條件的四位數依次存入數組 bb中 ,然后對數組 bb的四位數按從小到大的順序進行排序 ,最后調用寫函數 WRITEDAT()把數組 b中的數 輸出到 . void jsValue() /*標準答案 */ {int I,thou,hun,ten,data,j。 for(I=0。I300。I++) {thou=a[I]/1000。 hun=a[I]%1000/100。 ten=a[I]%100/10。 data=a[I]%10。 if (thou+data==hun+ten){b[t]=a[I]。t++。} } for(I=0。I for(j=I+1。j if(b[I]b[j]) {data=b[I]。 b[I]=b[j]。 b[j]=data。} } 題目 49：已知數據文件 300個四位數，并已調用讀函數 ReadDat()把這些數存入數組 a中，請編制一函數 jsvalue()，其功能是： 求出千位數上的數減百位數減十位數上的數減個位數上的數大于零的個數 t，再求出所有滿足此條件的四位數平均值 pjz1，以及不滿足此條件的四位數平均值 pjz2，最后調用寫函數 writeDat()把結果輸出到 。 void jsValue() /*標準答案 */ {int I,thou,hun,ten,data,n=0。 for(I=0。I300。I++) {thou=a[I]/1000。 hun=a[I]%1000/100。 ten=a[I]%100/10。 data=a[I]%10。 if (thouhuntendata0) {t++。pjz1+=a[I]。} else {n++。pjz2+=a[I]。} } pjz1/=t。pjz2/=n。 } 題目 50：函數 ReadDat()實現從文件 20行數據存放到字符串數組 xx中 (每行字符串長度均小于 80)。請編制函數 jsSort()，其函數的功能是：以行為單位對字符串按給定的條件進行排序，排序后的結果仍按行重新存入字符串數組 xx中，最后調用函數 WriteDat()把結果 xx輸出到文件。 /*標準答案 */ void jsSort() {int i,strl,half,j,k。 char ch。 for(i=0。i20。i++) /*行循環(huán) */ {strl=strlen(xx[i])。 /*每行長度 */ half=strl/2。 for(j=0。jfor(k=j+1。kif(xx[i][j]xx[i][k]) {ch=xx[i][j]。/*每次將最小數賦給 xx[i][j]*/ xx[i][j]=xx[i][k]。 xx[i][k]=ch。} for(j=half1,k=strl1。j=0。j,k) {ch=xx[i][j]。xx[i][j]=xx[i][k]。xx[i][k]=ch。} } } 1題目： 題目 51：已知數據文件 200個四位數 , 并已調用讀函數 readDat()把這些數存入數組 a中 ,請考生編制一函數 jsVal(),其功能是 : 把千位數字和十位數字重新組成一個新的十位數 (新十位數的十位數字是原四位數的千位數字 ,新十位數的個位數字是原四位數的十位數字 ), 以及把個位數字和百位數字組成另一個新的十位數 (新十位數的十位數字是原四位數的個位數字 ,新十位數的個位數字是原四位數的百位數字 ), 如果新組成的兩個十位數均是素數 ,同時兩個新數的十位數字均不為零 ,則將滿足此條件的四位數按從大到小的順序存入數組 b中 , 并要計算滿足上述條件的四位數的個數 t。最后 main()函數調用寫函數 writeDat( )把結果 t以及數組 b中符合條件的四位數輸出到。 注意 : 部分源程序存在文件 。 程序中已定義數組 : a[200], b[200], 已定義變量 : t 請勿改動數據文件 、主函數 main()、 讀函數 readDat()和寫函數 writeDat()的內容。 void jsVal() /*標準答案 */ {int I,thou,hun,ten,data,j。 int ab,cd。 for(I=0。I200。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 (isprime(ab)amp。amp。isprime(cd)amp。amp。ab!=0amp。amp。cd!=0) {b[t]=a[I]。t++。} } for(I=0。I for(j=I+1。j if(b[I] {data=b[I]。b[I]=b[j]。b[j]=data。} } include define MAX 200 int a[MAX], b[MAX], t = 0。 int isprime(int m) {int i。 for(i=2。i=m/2。i++) if(m%i==0) return 0。 return 1。 } void jsVal() { } void readDat() { int i 。 FILE *fp 。 fp = fopen(, r) 。 for(i = 0 。 i MAX 。 i++) fscanf(fp, %d, amp。a[i]) 。 fclose(fp) 。 } void main() { int i 。 readDat() 。 jsVal() 。 printf(滿足條件的數 =%d\n, t) 。 for(i = 0 。 i t 。 i++) printf(%d , b[i]) 。 printf(\n) 。 writeDat() 。 system(pause)。 } writeDat() { FILE *fp 。 int i 。 fp = fopen(, w) 。 fprintf(fp, %d\n, t) 。 for(i = 0 。 i t 。 i++) fprintf(fp, %d\n, b[i]) 。 fclose(fp) 。 } 題目 52：已知數據文件 200個四位數 , 并已調用讀函數 readDat()把這些數存入數組 a中 ,請考生編制一函數 jsVal(),其功能是 : 把千位數字和個位數字重新組成一個新的十位數 (新十位數的十位數字是原四位數的千位數字 ,新十位數的個位數字是原四位數的個位數字 ), 以及把十位數字和百位數字組成另一個新的十位數 (新十位數的十位數字是原四位數的百位數字 ,新十位數的個位數字是原四位數的十位數字 ), 如果新組成的兩個十位數均是奇數并且兩個十位數中至少有一個能被 5整除 ,同時兩個新數的十位數字均不為零 ,則將滿足此條件的四位數按從大到小的順序存入數組 b中 , 并要計算滿足上述條件的四位數的個數 t。最后 main()函數調用寫函數 writeDat( )把結果 t以及數組 b中符合條件的四位數輸出到 。 void jsVal() /*標準答案 */ {int I,thou,hun,ten,data,j。 int ab,cd。 for(I=0。I200。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==1amp。amp。cd%2==1amp。amp。(ab%5==0||cd%5==0)amp。amp。ab!=0amp。amp。cd!=0) {b[t]=a[I]。t++。} } for(I=0。I for(j=I+1。j if(b[I] {data=b[I]。b[I]=b[j]。b[j]=data。} } 題目 53：已知數據文件 300個四位數 ,并已調用讀函數 READDAT()把這些數存入數組 A中 .請編制一函數 SVALUE(),其功能是 :求出個位數上的數減千位數上的數減百位數上的數減十位數上的數大于零 的個數 t，再把所有滿足此條件的四位數依次存入數組 b中，然后對數組 b的四位數按從大到小的順序進行排序，最后調用寫函數 WRITEDAT()把數組 b中的數輸出到 . void jsValue() /*標準答案 */ {int I,thou,hun,ten,data,j。 for(I=0。I300。I++) {thou=a[I]/1000。 hun=a[I]%1000/100。 ten=a[I]%100/10。 data=a[I]%10。 if (datathouhunten0){b[t]=a[I]。t++。} } for(I=0。I for(j=I+1。j if(b[I] {data=b[I]。 b[I]=b[j]。b[j]=data。} } 題目 54：已知數據文件 300個四位數 ,并已調用讀函數 READDAT()把這些數存入數組 A中 .請編制一函數 SVALUE(),其功能是 :求出千位數上的數加個位數上的數等于百位數上的數加十位數上的數的個數 CNT,再把所有滿足條件的四位數依次存入數組 b中 ,然后對數組 b的四位數按從大到小的順序進行排序 ,最后調用寫函數 WRITEDAT()把數組 b中的數輸出到 . void jsValue() /*標準答案 */ {int I,thou,hun,ten,data,j。 for(I=0。I300。I++) {thou=a[I]/1000。 hun=a[I]%1000/100。 ten=a[I]%100/10。 data=a[I]%10。 if (thou+hun==data+ten){b[t]=a[I]。t++。} } for(I=0。I for(j=I+1。j if(b[I] {data=b[I]。b[I]=b[j]。b[j]=data。} } 題目 55：已知數據文件 300個四位數 ,并已調用讀函數 READDAT()把這些數存入數組 A中 .請編制一函數 SVALUE(),其功能是 :求出所有這些四位數是素數的個數 t，再把所有滿足此條件的四位數依次存入數組 b中，然后對數組 b的四位數按從小到大的順序進行排序，最后調用寫函數writeDat()把結果輸出到 。 void jsValue() /*標準答案 */ {int j,I,value。 for(I=0。I300。I++) if(isP(a[I])) {b[t]=a[I]。t++。} for(I=0。I for(j=I+1。j if(b[I]b[j]) {value=b[I]。 b[I]=b[j]。 b[j]=value。} } 題目 56：函數 ReadDat()實現從文件 ，存入到字符串數組 xx中；請編制函數 encryptChar()，按給定的替代關系對數組 xx中的所有字符進行替代，仍存入數組 xx的對應的位置上，最后調用函數 WriteDat()把結果 xx輸出到文件 。 替代關系： f(p)=p*11mod 256 (p是數組中某一個字符的 ASCII值， f(p)是計算后新字符的 ASCII值 )，如果計算后 f(p)值小于等于 32或 f(p)對應的字符是小寫字母，則該字符不變，否則將 f(p)所對應的字符進行替代。 void encryptChar()/*標準答案 */ {int i,j,t。 for(i=0。i{for(j=0。j{t=xx[i][j]*11%256。 if(t=32 ||(t=39。a39。 amp。amp。 t=39。z39。)) continue。 xx[i][j]=t。}} } 題目 57：設有 n個人圍坐一 圈并按順時針方向從 1到 n編號，從第 s個人開始進行 1到 m的報數，報數到第個 m人，此人出圈，再從他的下一個人重新開始 1到 m的報數，如此進行下去直到所有的人都出圈為止?，F要求按出圈次序，每 10人一組，給出這 n個人的順序表。請考生編制函數 Josegh()實現此功能并調用函數 WriteDat()把結果 p輸出到文件 。 void Josegh(void) /*標準答案 */ {int I,j,k,s1,w。 s1=s。 for(I=1。I=n。I++) p[I1]=I。 for(I=n。I=2。I) {s1=(s1+m1)%I。 if (s1==0) s1=I。 w=p[s11]。 for(j=s1。j=I1。j++) p[j1]=p[j]。 p[I1]=w。} } 題目 58：對 10個候選人進行選舉，現有一個 100條記錄的選票數據文件 ，其數據存放的格式是每條記錄的長度均為 10位，第一位表示第一個人的選中情況，第二位表示第二個人的選中情況，依此類推 ：內容均為字符 0和 1， 1表示此人被選中， 0表示此人未被選中，若一張選票人數小于等于 5個人時被認為無