計算機等級考試三級上機試題

2011年9月全國計算機等級考試三級上機試題【南開100題最新版】

<■WOwWt-_jamMMW—MMaw■■w**WJBWJBW4i_0■WITMW^iMQMOiw???.—ffil-WO—OW—QWQ—■■―=_W***■■WW■

整數(shù)排序題

☆題目1(整數(shù)排序題)

在文件in.dat中有200個正整數(shù)，且每個數(shù)均在1000至9999之間。函數(shù)ReadDat()

讀取這200個數(shù)存放到數(shù)組aa中。請編制函數(shù)jsSort(),其函數(shù)的功能是：要求女

每個數(shù)的后三位的大小進行升序排列,然后取出滿足此條件的前10個數(shù)依次存入數(shù)

組bb中,如果后三位的數(shù)值相等,則按原先的數(shù)值進行降序排列。最后調(diào)用函數(shù)

WriteDat()把結(jié)果bb輸出到文件out.dat中。

例：處理前60125099901270258088

處理后90126012702580885099

voidjsSort()

(

inti,j,data;

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

for(j=i+l;j<200;j++)

if(aa[i]%1000>aa[j]%1000||aa[i]%1000==aa[j]%1000&&aa[i]<aa[j])

{data=aa[i];aa[i]=aa[j];aa[j]=data;}

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

bb[i]=aa[i];

)

☆題目2正整數(shù)排序

在文件in.dat中有200個正整數(shù)，且每個數(shù)均在1000至9999之間。函數(shù)ReadDat()

讀取這200個數(shù)存放到數(shù)組aa中。請編制函數(shù)jsSort(),其函數(shù)的功能是：要求我

每個數(shù)的后三位的大小進行降序排列,然后取出滿足此條件的前10個數(shù)依次存入數(shù)

組b中,如果后三位的數(shù)值相等,則按原先的數(shù)值進行升序排列。最后調(diào)用函數(shù)

WriteDat()把結(jié)果bb輸出到文件out.dat中。

例：處理前90125099601270258088

處理后50998088702560129012

voidjsSort()

(

inti,j,data;

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

for(j=i+l;j<200;j++)

if(aa[i]%1000<aa[j]%1000|Iaa[i]%1000==aa[j]%1000&&aa[i]>aa[j])

(data=aa[i];aa[i]=aa[j];aa[j]=data;}

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

bb[i]=aa[i];

)

—WU-BWW-=?4M—一—————Q|————OIW—W-4_=_14_1_-4rr-r；-WBw'w?

★☆題目3(整數(shù)統(tǒng)計排序題)

已知數(shù)據(jù)文件IN.DAT中存有200個四位數(shù)，并已調(diào)用讀函數(shù)readDatO把這些數(shù)存

入數(shù)組a中，請考生編制一函數(shù)jsValO,其功能是：依次從數(shù)組a中取出一個四位

數(shù),如果該四位數(shù)連續(xù)大于該四位數(shù)以后的五個數(shù)且該數(shù)是奇數(shù)(該四位數(shù)以后不滿

五個數(shù),則不統(tǒng)計),則統(tǒng)計出滿足此條件的個數(shù)ent并把這些四位數(shù)按從小到大的

順序存入數(shù)組b中,最后調(diào)用寫函數(shù)writeDat()把結(jié)果ent以及數(shù)組b中符合條件

的四位數(shù)輸出到OUT.DAT文件中。

voidjsVal()

{inti,j,flag;

for(i=0;i<MAX-5;i++)

(for(j=i+l;j<=i+5;j++)

if(a[i]>a[j]&&a[i]%2)flag=l;

else{flag=0;break;}

if(flag==l)b[cnt++]=a[i];

)

for(i=0;i<cnt-l;i++)

for(j=i+l;j<cnt;j++)

if(b[i]>b[j]){flag=b[i];b[i]=b[j];b[j]=flag;}

)

w***oworr——MMw—一?—■■—?-__■j■―MI—?r~Trm—wwoWI-MW_wtfaivw*0■?■w011—<**!--m—m—rr—1~|—w——MM■■?■.■

☆題目4(整數(shù)統(tǒng)計排序題)

已知數(shù)據(jù)文件IN.DAT中存有200個四位數(shù)，并已調(diào)用讀函數(shù)readDatO把這些數(shù)存

入數(shù)組a中，請考生編制一函數(shù)jsValO,其功能是：依次從數(shù)組a中取出一個四位

數(shù),如果該四位數(shù)連續(xù)小于該四位數(shù)以后的五個數(shù)且該數(shù)是偶數(shù)(該四位數(shù)以后不滿

五個數(shù),則不統(tǒng)計),則統(tǒng)計出滿足此條件的個數(shù)ent并把這些四位數(shù)按從小到大的

順序存入數(shù)組b中,最后調(diào)用寫函數(shù)writeDat()把結(jié)果ent以及數(shù)組b中符合條件

的四位數(shù)輸出到OUT.DAT文件中。

voidjsVal0

{inti,j,flag;

for(i=0;i<MAX-5;i++)

{for(j=i+l;j<=i+5;j++)

if(a[i]<a[j]&&a[i]%2==0)flag=l;

else{flag=O;break;}

if(flag==l)b[cnt++]=a[i];

)

for(i=0;i<cnt-l;i++)

for(j=i+l;j<cnt;j++)

if(b[i]>b[j]){flag=b[i];b[i]=b[j];b[j]=flag;}

)

題目5(整數(shù)運算排序題)

在文件in.dat中有200組數(shù)據(jù)，每組有3個數(shù),每個數(shù)均是三位數(shù)。函數(shù)ReadDat()

讀取這200組數(shù)據(jù)存放到結(jié)構(gòu)數(shù)組aa中，請編制函數(shù)jsSort(),其函數(shù)的功能是：

要求在200組數(shù)據(jù)中找出條件為每組中的第二個數(shù)大于第一個數(shù)加第三個數(shù)的之和,

其中滿足條件的組數(shù)作為函數(shù)jsSortO的返回值,同時把滿足條件的數(shù)據(jù)存入結(jié)構(gòu)

數(shù)組bb中,再對bb中的數(shù)據(jù)按照每組數(shù)據(jù)的第二個數(shù)加第三個之和的大小進行降序

排列(第二個數(shù)加第三個數(shù)的和均不相等),排序后的結(jié)果仍重新存入結(jié)構(gòu)數(shù)組bb中,

最后調(diào)用函數(shù)WriteDat()把結(jié)果bb輸出到文件out.dat中。

intjsSort()

{inti,j,cnt=0;

datach;

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

if(aa[i].x2>aa[i].xl+aa[i].x3)bb[cnt++]=aa[i];

for(i=0;i<cnt-l;i++)

for(j=i+l;j<cnt;j++)

if(bb[i].x2+bb[i].x3<bb[j].x2+bb[j].x3)

{ch=bb[i];bb[i]=bb[j];bb[j]=ch;}

returnent;

)

★題目6(整數(shù)各位統(tǒng)計排序題)

已知數(shù)據(jù)文件IN.DAT中存有200個四位數(shù)，并已調(diào)用讀函數(shù)readDatO把這些數(shù)存

入數(shù)組a中，請考生編制一函數(shù)JsValO,其功能是：若一個四位數(shù)的千位數(shù)字上的

值大于等于百位數(shù)字上的值,百位數(shù)字上的值大于等于十位數(shù)字上的值,以及十位數(shù)

字上的值大于等于個位數(shù)字上的值,并且原四位數(shù)是奇數(shù),則統(tǒng)計出滿足此條件的個

數(shù)ent并把這些四位數(shù)按從小到大的順序存入數(shù)組。聲，最后調(diào)用寫函數(shù)writeDat()

把結(jié)果ent以及數(shù)組b中符合條件的數(shù)輸出到OUT.DAT文件中。

voidjsVal0

{inti,j,thou,hun,ten,data;

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

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

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

if(thou>=hun&&hun>=ten&&ten>=data&&a[i]%2)b[cnt++]=a[i];

)

for(i=0;i<cnt-l;i++)

for(j=i+l;j<cnt;j++)

if(b[i]>b[j])(thou=b[i];b[i]=b[j];b[j]=thou;}

)

題目7(整數(shù)統(tǒng)計排序題)

已知數(shù)據(jù)文件IN.DAT中存有200個四位數(shù)，并已調(diào)用讀函數(shù)readDatO把這些數(shù)存

入數(shù)組a中，請考生編制一函數(shù)jsValO,其功能是：把一個四位數(shù)的千位數(shù)字上的

值加上個位數(shù)字上的值恰好等于百位數(shù)字上的值加上十位數(shù)字上的值,并且原四位數(shù)

是奇數(shù),則統(tǒng)計出滿足此條件的個數(shù)ent并把這些四位數(shù)按從小到大的順序存入數(shù)組

b中,最后調(diào)用寫函數(shù)writeDat()把結(jié)果ent以及數(shù)組b中符合條件的四位數(shù)輸出

到OUT.DAT文件中。

voidjsVal0

(

inti,j,gw,sw,bw,qw;

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

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

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

if((qw+gw)==(sw+bw)&&a[i]%2)b[cnt++]=a[i];

)

for(i=0;i<cnt-l;i++)

for(j=i+l;j<cnt;j++)

if(b[i]>b[j]){qw=b[i];b[i]=b[j];b[j]=qw;}

)

—WU-BWW-=?4M—一—————Q|————OIW—W-4_=_14_1_-4rr-r；-WBw'w?

★題目8(整數(shù)排序題)

下列程序的功能是：將一正整數(shù)序列(KI,K2,...,K9)重新排列成一個新的序列。新序

列中,比K1小的數(shù)都在K1的前面(左面),比K1大的數(shù)都在K1的后面(右面)。要

求編寫函數(shù)jsValueO實現(xiàn)此功能，最后調(diào)用writeDatO函數(shù)將新序列輸出到文件

out.dat中。

說明：在程序中已給出了10個序列，每個序列有9個正整數(shù)，并存入數(shù)組a[10][9]

中，分別求出這10個新序列。

例：序列{6,8,9,1,2,5,4,7,3}

經(jīng)重排后成為{3,4,5,2,1,6,8,9,7}

jsValue(inta[10][9])

{inti,j,k,val,num;

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

{val=a[i][0];

for(j=0;j<9;j++)

if(a[i][j]<val)

{num=a[i][j];

for(k=j;k>0;k—)

a[i][k]=a[i][k-1];

a[i][0]=num;

)

)

}

★題目9(整數(shù)各位數(shù)字運算排序題)

已知數(shù)據(jù)文件IN.DAT中存有200個四位數(shù)，并已調(diào)用讀函數(shù)readDatO把這些數(shù)存

人數(shù)組a中，請考生編制一函數(shù)jsValO,其功能是：若一個四位數(shù)的千位數(shù)字上的

值小于等于百位數(shù)字上的值,百位數(shù)字上的值小于等于十位數(shù)字上的值,以及十位數(shù)

字上的值小于等于個位數(shù)字上的值,并且原四位數(shù)是偶數(shù),則統(tǒng)計出滿足此條件的個

數(shù)ent并把這些四位數(shù)按從小到大的順序存入數(shù)組。聲，最后調(diào)用寫函數(shù)writeDat()

把結(jié)果ent以及數(shù)組b中符合條件的四位數(shù)輸出到OUT.DAT文件中。

voidjsVal0

{inti,j;

intqw,bw,sw,gw;

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

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

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

if((qw<=bw)&&(bw<=sw)&&(sw<=gw)&&(a[i]%2==0))b[cnt++]=a[i];

)

for(i=0;i<cnt-l;i++)

for(j=i+l;j<cnt;j++)

if(b[i]>b[j]){qw=b[i];b[i]=b[j];b[j]=qw;}

}

題目10(整數(shù)各位數(shù)運算排序題)

已知數(shù)據(jù)文件in.dat中存有300個四位數(shù)，并已調(diào)用讀函數(shù)ReadDat()把這些數(shù)存

入數(shù)組a中，請編制一函數(shù)jsValueO,其功能是：求出千位數(shù)上的數(shù)加百位數(shù)上的

數(shù)等于十位數(shù)上的數(shù)加個位數(shù)上的數(shù)的個數(shù)ent,再把所有滿足此條件的四位數(shù)依次

存入數(shù)組b中,然后對數(shù)組b的四位數(shù)按從大到小的順序進行排序,最后調(diào)用寫函數(shù)

writeDat()把結(jié)果輸出到out.dat文件。

例如：7153,7+1=5+3,則該數(shù)滿足條件存入數(shù)組b中，且個數(shù)cnt=cnt+L

8129,8+102+9,則該數(shù)不滿足條件忽略。

jsValue()

{inti,j,qw,bw,sw,gw;

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

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

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

if(qw+bw==sw+gw)b[cnt++]=a[i];

}

for(i=0;i<cnt-l;i++)

for(j=i+l；j<cnt;j++)

if(b[i]<b[j]){qw=b[i];b[i]=b[j];b[j]=qw;}

}

★☆題目11(整數(shù)各位數(shù)運算及排序題)

在文件in.dat中有200組數(shù)據(jù)，每組有3個數(shù)，每個數(shù)均是三位數(shù)。函數(shù)ReadDatO

讀取這200組數(shù)據(jù)存放到結(jié)構(gòu)數(shù)組aa中，請編制函數(shù)jsSort(),其函數(shù)的功能是：

要求在200組數(shù)據(jù)中找出條件為每組中的第一個數(shù)大于第二個數(shù)加第三個數(shù)的和,其

中滿足條件的組數(shù)作為函數(shù)jsSort()的返回值,同時把滿足條件的數(shù)據(jù)存入結(jié)構(gòu)數(shù)

組bb中,再對bb中的數(shù)據(jù)按照每組數(shù)據(jù)的第一個數(shù)加第三個之和的大小進行升序排

列(第一個數(shù)加第三個數(shù)的和均不相等),排序后的結(jié)果仍重新存入結(jié)構(gòu)數(shù)組bb中,

最后調(diào)用函數(shù)writeDat()把結(jié)果bb輸出到

文件out.dat中。

intjsSort0

{inti,j,cnt=0;

dataxy;

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

if(aa[i].xl>(aa[i].x2+aa[i].x3))bb[cnt++]=aa[i];

for(i=0;i<cnt-l;i++)

for(j=i+l;j<cnt;j++)

if(bb[i].xl+bb[i].x3>bb[j].xl+bb[j].x3){xy=bb[i];bb[i]=bb[j];

bb[j]=xy;}

returnent;

)

整數(shù)統(tǒng)計運算題

★☆題目12整數(shù)統(tǒng)計運算題)

已知在文件IN.DAT中存有若干個(個數(shù)〈200)四位數(shù)字的正整數(shù)，函數(shù)ReadDatO

讀取這若干個正整數(shù)并存入數(shù)組xx中。請編制函數(shù)CalValueO,其功能要求：1、

求出這文件中共有多少個正整數(shù)totNum;2、求這些數(shù)右移1位后,產(chǎn)生的新數(shù)是偶

數(shù)的數(shù)的個數(shù)totCnt,以及滿足此條件的這些數(shù)(右移前的值)的算術(shù)平均值totPjz,

最后調(diào)用函數(shù)writeDat()把所求的結(jié)果輸出到文件OUT.DAT中。

voidCalValue(void)

{inti,data;

for(i=0;KMAXNUM;i++)

if(xx[i]>0)

{totNum++;

data=xx[i]?1;

if(data%2==0){totCnt++;totPjz+=xx[i];}

)

if(totCnt==0)totPjz=0;

elsetotPjz/=totCnt;

}

☆題目13(整數(shù)統(tǒng)計運算題)

已知在文件IN.DAT中存有若干個(個數(shù)〈200)四位數(shù)字的正整數(shù)，函數(shù)ReadDatO

讀取這若干個正整數(shù)并存入數(shù)組xx中。請編制函數(shù)CalValueO,其功能要求：

1、求出這文件中共有多少個正整數(shù)totNum;

2求這些數(shù)中的各位數(shù)字之和是偶數(shù)的數(shù)的個數(shù)totCnt,

以及滿足此條件的這些數(shù)的算術(shù)平均值totPjz,最后調(diào)用函數(shù)writeDat()把所求的

結(jié)果輸出到文件OUT.DAT中。

voidCalValue(void)

{inti,qw,bw,sw,gw;

for(i=0;KMAXNUM;i++)

if(xx[i]>0)

{totNum++;

qw=xx[i]/1000;

bw=xx[i]/100%10;

sw=xx[i]%100/10;

gw=xx[i]%10;

if((qw+bw+sw+gw)%2==0){totCnt++;totPjz+=xx[i];}

)

if(totCnt==0)totPjz=0;

elsetotPjz/=totCnt;

}

☆題目14(整數(shù)統(tǒng)計運算題)

已知在文件IN.DAT中存有若干個(個數(shù)〈200)四位數(shù)字的正整數(shù)，函數(shù)ReadDatO

讀取這若干個正整數(shù)并存入數(shù)組xx中。請編制函數(shù)CalValueO,其功能要求：1、

求出這文件中共有多少個正整數(shù)totNum;2、求這些數(shù)中的各位數(shù)字之和是奇數(shù)的數(shù)

的個數(shù)totCnt,以及滿足此條件的這些數(shù)的算術(shù)平均值totPjz,最后調(diào)用函數(shù)

writeDat()把所求的結(jié)果輸出到文件OUT.DAT中。

voidCalValue(void)

{inti,qw,bw,sw,gw;

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

if(xx[i]>0)

{totNum++;

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

sw=xx[i]%l00/10;gw=xx[i]%10;

if((qw+bw+sw+gw)%2){totCnt++;totPjz+=xx[i];}

)

if(totCnt==0)totPjz=0;

elsetotPjz/=totCnt;

)

題目15(整數(shù)統(tǒng)計運算題)

已知數(shù)據(jù)文件IN.DAT中存有200個四位數(shù)，并已調(diào)用讀函數(shù)readDatO把這些數(shù)存

入數(shù)組a中，請考生編制一函數(shù)jsValO,其功能是：把一個四位數(shù)的千位數(shù)字上的

值減去百位數(shù)字上的值再減去十位數(shù)字上的值最后減去個位數(shù)字上的值，如果得出的

值大于等于零且原四位數(shù)是奇數(shù),則統(tǒng)計出滿足此條件的個數(shù)cnt并把這些四位數(shù)按

從小到大的順序存入數(shù)組b中,最后調(diào)用寫函數(shù)writeDat()把結(jié)果ent以及數(shù)組b

中符合條件的四位數(shù)輸出到OUT.DAT文件中。

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

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

請勿改動數(shù)據(jù)文件IN.DAT中的任何數(shù)據(jù)、主函數(shù)main。、讀函數(shù)readDat()和

寫函數(shù)writeDatO的內(nèi)容。

voidjsVal0

{inti,j,thou,hun,ten,data;

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

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

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

if(thou-hun-ten-data>=0&&a[i]%2)b[cnt++]=a[i];

)

for(i=0;i<cnt-l;i++)

for(j=i+l;j<cnt;j++)

if(b[i]>b[jl){thou=b[i];b[i]=b[j];b[j]=thou;}

}

w***oworr——MMw—一?—■■—?-__j■■―MI—?r~Trm—wwoWI-MW_wtfaivw*0■?■w011—<**!--m—m—rr—1~|—w——MM■■?■.■

題目16(整數(shù)統(tǒng)計運算題)

已知在文件IN.DAT中存有若干個(個數(shù)〈200)四位數(shù)字的正整數(shù)，函數(shù)ReadDatO

讀取這若干個正整數(shù)并存入數(shù)組xx中。請編制函數(shù)CalValueO,其功能要求：1、

求出這文件中共有多少個正整數(shù)totNum;2、求這些數(shù)右移1位后,產(chǎn)生的新數(shù)是奇

數(shù)的數(shù)的個數(shù)totCnt,以及滿足此條件的這些數(shù)(右移前的值)的算術(shù)平均值totPjz,

最后調(diào)用函數(shù)writeDat()把所求的結(jié)果輸出到文件OUT.DAT中。

voidCalValue(void)

{inti,data;

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

if(xx[i]>0)

{totNum++;

data=xx[i]?1;

if(data%2){totCnt++;totPjz+=xx[i];}

)

if(totCnt==0)totPjz=0;

elsetotPjz/=totCnt;

)

題目17(整數(shù)統(tǒng)計運算題)

請編制程序progl.c,從文件in.dat中讀取200個整數(shù)至數(shù)組xx中，求出奇數(shù)的個

數(shù)cntl和偶數(shù)的個數(shù)ent2以及數(shù)組xx下標為偶數(shù)的元素值的算術(shù)平均值pj(保留

2位小數(shù))。

sum=0;pj=0.0;cntl=cnt2=0;

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

{if(xx[i]%2)cntl++;

elsecnt2++;

if(i%2==0){pj+=xx[i];sum++;}

)

pj/=sum;

☆題目18（整數(shù)統(tǒng)計運算題）

請編制程序progl.c,從文件IN.DAT中讀取200個整數(shù)至數(shù)組xx中，求出最大數(shù)max

及最大數(shù)的個數(shù)ent和數(shù)組xx中能被3整除或能被7整除的算術(shù)平均值pj（保留2

位小數(shù)）。

cnt=0;max=xx[0];pj=0.0;n=0;

for(m=0;m<N;m++)

if(max<xx[m])max=xx[m];

for(m=0;m<N;m++)

{if(xx[m]==max)cnt++;

if(xx[m]%3==011xx[m]%7==0)

{pj+=xx[m];n++;}

)

pj/=n；

題目19(整數(shù)統(tǒng)計運算題)

請編制程序progl.c,從文件in.dat中讀取200個整數(shù)至數(shù)組xx中,求出奇數(shù)的個

數(shù)cntl和偶數(shù)的個數(shù)ent2以及數(shù)組xx中值為偶數(shù)的算術(shù)平均值pj(保留2位小數(shù))。

結(jié)果cntl,cnt2,pj輸出到out.dat中。

cntl=0;cnt2=0;pj=0.0;

for(m=0;m<N;m++)

if(xx[m]%2)cntl++;

else{cnt2++;pj+=xx[m];}

if(cnt2==0)pj=0;

elsepj/=cnt2;

題目20(整數(shù)各位數(shù)字運算題)

已知數(shù)據(jù)文件in.dat中存有300個四位數(shù)，并已調(diào)用讀函數(shù)ReadDat()把這些數(shù)存

入數(shù)組a中，請編制一函數(shù)jsValueO,其功能是：求出千位數(shù)上的數(shù)減百位數(shù)上的

數(shù)減十位數(shù)上的數(shù)減個位數(shù)上的數(shù)大于零的個數(shù)ent,再把所有滿足此條件的四位數(shù)

依次存入數(shù)組b中,然后對數(shù)組b的四位數(shù)按從小到大的順序進行排序、最后調(diào)用寫

函數(shù)writeDat()把結(jié)果輸出到out.dat文件。

例如：9123,9-1-2-3>0,則該數(shù)滿足條件存入數(shù)組b中，且個數(shù)cnt=cnt+L

9812,9-8-1-2>0,則該數(shù)不滿足條件忽略。

jsValue0

{inti,j,qw,bw,sw,gw;

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

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

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

if(qw-bw-sw-gw>0)b[cnt++]=a[i];

}

for(i=0;i<cnt-l;i++)

for(j=i+l;j<cnt;j++)

if(b[i]>b[j]){qw=b[i];b[i]=b[j];b[j]=qw;}

)

☆題目21(整數(shù)各位數(shù)字運算題)

已知數(shù)據(jù)文件in.dat中存有300個四位數(shù)，并已調(diào)用讀函數(shù)ReadDat()把這些數(shù)存

入數(shù)組a中，請編制一函數(shù)jsValueO,其功能是：求出千位數(shù)上的數(shù)加個位數(shù)上的

數(shù)等于百位數(shù)上的數(shù)加十位數(shù)上的數(shù)的個數(shù)ent,再把所有滿足此條件的四位數(shù)依次

存入數(shù)組b中,然后對數(shù)組b的四位數(shù)按從小到大的順序進行排序,最后調(diào)用寫函數(shù)

writeDat0把結(jié)果輸出到out.dat文件。

例如：6712,6+2=7+1,則該數(shù)滿足條件存入數(shù)組b中，且個數(shù)cnt=cnt+L

8129,8+901+2,則該數(shù)不滿足條件忽略

jsValue()

{inti,qw,bw,sw,gw,j;

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

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

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

if(qw+gw==bw+sw)b[cnt++]=a[i];

)

for(i=0;i<cnt-l;i++)

for(j=i+l;j<cnt;j++)

if(b[i]>b[j]){qw=b[i];b[i]=b[j];b[j]=qw;}

)

題目22(整數(shù)各位數(shù)字運算題)

已知數(shù)據(jù)文件in.dat中存有300個四位數(shù)，并已調(diào)用讀函數(shù)ReadDat()把這些數(shù)存

入數(shù)組a中，請編制一函數(shù)jsValueO,其功能是：求出千位數(shù)上的數(shù)減百位數(shù)減十

位數(shù)上的數(shù)減個位數(shù)上的數(shù)大于零的個數(shù)ent,再求出所有滿足此條件的四位數(shù)平均

值pjzl,以及不滿足此條件的四位數(shù)平均值pjz2,最后調(diào)用寫函數(shù)writeDatO把結(jié)

果輸出到out.dat文件。

例如：9123,9-1-2-3>0,則該數(shù)滿足條件計算平均值pjzl,且個數(shù)cnt=cnt+L

9812,9-8-1-2<0,則該數(shù)不滿足條件計算平均值pjz2°

jsValue()

{inti,qw,bw,sw,gw,n=0;

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

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

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

if(qw-bw-sw-gw>0){cnt++;pjzl+=a[i];}

else{n++;pjz2+=a[i];}

)

if(cnt==O)pjzl=O;

elsepjzl/=cnt;

if(n=0)pjz2=0;

elsepjz2/=n;

}

☆題目23(整數(shù)各位數(shù)字運算題)

已知數(shù)據(jù)文件in.dat中存有300個四位數(shù)，并已調(diào)用讀函數(shù)ReadDat()把這些數(shù)存

入數(shù)組a中，請編制一函數(shù)jsValueO,其功能是：求出千位數(shù)上的數(shù)減百位數(shù)上的

數(shù)減十位數(shù)上的數(shù)減個位數(shù)上的數(shù)大于零的個數(shù)ent,再把所有滿足此條件的四位數(shù)

依次存入數(shù)組b中,然后對數(shù)組b的四位數(shù)按從小到大的順序進行排序,最后調(diào)用寫

函數(shù)writeDat()把結(jié)果輸出到out.dat文件。

例如：9123,9-1-2-3>0,則該數(shù)滿足條件存入數(shù)組b中，且個數(shù)cnt=cnt+L

jsValue()

{inti,j,qw,bw,sw,gw;

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

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

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

if((qw-bw-sw-gw)>0)b[cnt++]=a[i];

}

for(i=0;i<cnt-l;i++)

for(j=i+l；j<cnt;j++)

if(b[i]>b[j]){qw=b[i];b[i]=b[j];b[j]=qw;}

題目24(整數(shù)各位數(shù)字運算題)

下列程序的功能是：選出5000以下符合條件的自然數(shù)。條件是：千位數(shù)字與百位數(shù)

字之和等于十位數(shù)字與個位數(shù)字之和，且千位數(shù)字與百位數(shù)字之和等于個位數(shù)字與千

位數(shù)字之差的10倍。計算并輸出這些四位自然數(shù)的個數(shù)ent以及這些數(shù)的和sum。

請編寫函數(shù)countValue()實現(xiàn)程序的要求，最后調(diào)用函數(shù)writeDat()把結(jié)果ent和

sum,輸出到文件OUT13.DAT中。

voidcountValue0

{inti,thou,hun,ten,data;

for(i=1000;i<5000;i++)

{thou=i/1000;hun=i%1000/100;

ten=i%100/10;data=i%10;

if(thou+hun==ten+data&&thou+hun==(data-1hou)*10){cnt++;sum+=i;}

)

)

☆題目25(整數(shù)各位數(shù)字統(tǒng)計運算題)

已知數(shù)據(jù)文件IN.DAT中存有200個四位數(shù)，并已調(diào)用讀函數(shù)readDatO把這些數(shù)存

入數(shù)組a中，請考生編制一函數(shù)jsValO,其功能是：如果四位數(shù)各位上的數(shù)字均是

奇數(shù),則統(tǒng)計出滿足此條件的個數(shù)ent并把這些四位數(shù)按從大到小的順序存入數(shù)組b

中。最后main。函數(shù)調(diào)用寫函數(shù)writeDat()把結(jié)果ent以及數(shù)組b中符合條件的四

位數(shù)輸出到OUT.DAT文件中。

voidjsVal0

{inti,j,thou,hun,ten,data;

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

{thou=a[i]/1000;hun=a[i]%1OOO/1OO;

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

if(thou&&thou%2&&hun%2&&ten%2&&data%2)b[cnt++]=a[i];

}

for(i=0;i<cnt-l;i++)

for(j=i+l;j<cnt;j++)

if(b[i]<b[j])(thou=b[i];b[i]=b[j];b[j]=thou;}

}

★☆題目26(整數(shù)各位運算題)

已知數(shù)據(jù)文件IN.DAT中存有200個四位數(shù)，并已調(diào)用讀函數(shù)readDatO把這些數(shù)存

入數(shù)組a中，請考生編制一函數(shù)jsValO,其功能是：把一個四位數(shù)的千位數(shù)字上的

值加上十位數(shù)字上的值恰好等于百位數(shù)字上的值加上個位數(shù)字上的值,并且原四位數(shù)

是偶數(shù),則統(tǒng)計出滿足此條件的個數(shù)ent并把這些四位數(shù)按從小到大的順序存入數(shù)組

b中,最后調(diào)用寫函數(shù)writeDat()把結(jié)果ent以及數(shù)組b中符合條件的四位數(shù)輸出

到OUT.DAT文件中。

voidjsVal0

{inti,j,thou,hun,ten,data;

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

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

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

if((thou+ten==hun+data)&&a[i]%2==0)b[cnt++]=a[i];

)

for(i=0;i<cnt-l;i++)

for(j=i+l;j<cnt;j++)

if(b⑴)b[j]){thou=b[i];b[i]=b[j];b[j]=thou;}

}

題目27(整數(shù)各位數(shù)運算題)

已知數(shù)據(jù)文件in.dat中存有300個四位數(shù)，并已調(diào)用讀函數(shù)ReadDat()把這些數(shù)存

入數(shù)組a中，請編制一函數(shù)jsValueO,其功能是：求出個位數(shù)上的數(shù)減千位數(shù)上的

數(shù)減百位數(shù)上的數(shù)減十位數(shù)上的數(shù)大于零的個數(shù)ent,再求出所有滿足此條件的四位

數(shù)平均值pjzl,以及不滿足此條件的四位數(shù)平均值pjz2,最后調(diào)用寫函數(shù)writeDat()

把結(jié)果輸出到out.dat文件。

例如：1239,9-1-2-3>0,則該數(shù)滿足條件計算平均值pjzl,且個數(shù)cnt=cnt+l。

8129,9-8-1-2<0,則該數(shù)不滿足條件計算平均值pjz2。

jsValue()

{inti,j,thou,hun,ten,data,n=0;

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

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

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

if(data-thou-hun-ten>0){cnt++;pjzl+=a[i];}

else{n++;pjz2+=a[i];}

)

if(cnt==0)pjzl=0;

elsepjzl/=cnt;

if(n=0)pjz2=0;

elsepjz2/=n;

☆題目28（整數(shù)各位數(shù)運算題）

已知數(shù)據(jù)文件in.dat中存有300個四位數(shù)，并已調(diào)用讀函數(shù)ReadDat（）把這些數(shù)存

入數(shù)組a中，請編制一函數(shù)jsValueO,其功能是：求出千位數(shù)上的數(shù)加百位數(shù)等于

十位數(shù)上的數(shù)加個位數(shù)上的數(shù)的個數(shù)ent,再求出所有滿足此條件的四位數(shù)平均值

pjzl,以及不滿足此條件的四位數(shù)平均值Pjz2,最后調(diào)用寫函數(shù)writeDatO把結(jié)果

輸出到out.dat文件。

例如：7153,7+1=5+3,則該數(shù)滿足條件計算平均值pjzl,且個數(shù)cnt=cnt+l0

8129,8+102+9,則該數(shù)不滿足條件計算平均值pjz20

jsValue()

{inti,thou,hun,ten,data,n=0;

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

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

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

if(thou+hun==ten+data){cnt++;pjzl+=a[i];}

else(n++;pjz2+=a[i];}

)

if(cnt==O)pjzl=O;

elsepjzl/=cnt;

if(n=0)pjz2=0;

elsepjz2/=n;

)

☆題目29（整數(shù)各位運算統(tǒng)計題）

已知數(shù)據(jù)文件in.dat中存有300個四位數(shù)，并已調(diào)用讀函數(shù)ReadDat()把這些數(shù)存

入數(shù)組a中，請編制一函數(shù)jsValueO,其功能是：求出千位數(shù)上的數(shù)加個位數(shù)等于

百位數(shù)上的數(shù)加十位數(shù)上的數(shù)的個數(shù)ent,再求出所有滿足此條件的四位數(shù)平均值

pjzl,以及不滿足此條件的四位數(shù)平均值pjz2,最后調(diào)用寫函數(shù)把結(jié)果輸出到

out.dat文件。

例如：6712,6+2=7+1,則該數(shù)滿足條件計算平均值pjzl,且個數(shù)cnt=cnt+l0

8129,8+901+2,則該數(shù)不滿足條件計算平均值pjz2。

jsValue()

{inti,gw,sw,bw,qw,cnt2=0;

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

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

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

if((qw+gw)==(sw+bw)){cnt++;pjzl+=a[i];}

else{cnt2++;pjz2+=a[i];}

)

if(cnt==O)pjzl=O;

elsepjzl/=cnt;

if(cnt2==0)pjz2=0;

elsepjz2/=cnt2;

)

☆題目30

請編寫一個函數(shù)jsValue(intm,intk,intxx[]),該函數(shù)的功能是：將大于整數(shù)m

且緊靠m的k個素數(shù)存入數(shù)組xx傳回。

最后調(diào)用函數(shù)writeDatO讀取10組數(shù)據(jù),分別得出結(jié)果且把結(jié)果輸出到文件

out.dat中。

部分源程序存在文件progl.c中。

例如：若輸入175則應輸出：19,23,29,31,37。

請勿改動主函數(shù)main。和寫函數(shù)writeDat()的內(nèi)容。

intisP(intm)

(

inti;

for(i=2;i<m;i++)

if(m%i==0)return0;

return1;

)

voidnum(intm,intk,intxx[])

{ints=0;

for(m=m+l;k>0;m++)

if(isP(m)){xx[s++]=m;k—;}

)

題目31

已知數(shù)據(jù)文件IN.DAT中存有200個四位數(shù)，并已調(diào)用讀函數(shù)readDatO把這些數(shù)存

入數(shù)組a中，請考生編制一函數(shù)jsValO,其功能是：如果四位數(shù)各位上的數(shù)字均是

0或2或4或6或8,則統(tǒng)計出滿足此條件的個數(shù)ent,并把這些四位數(shù)按從大到小

的順序存入數(shù)組b中。最后main()函數(shù)調(diào)用寫函數(shù)writeDat()把結(jié)果cnt以及數(shù)組

b中符合條件的四位數(shù)輸出到OUT.DAT文件中。

voidjsVal0

{inti,j,qw,bw,sw,gw;

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

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

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

if(qw&&qw%2==0&&bw%2==0&&sw%2==0&&gw%2==0)b[cnt++]=a[i];

)

for(i=0;i<cnt-l;i++)

for(j=i+l;j<cnt;j++)

if(b[i]<b[jl)[qw=b[i];b[i]=b[j];b[j]=qw;}

)

整數(shù)各位打散組合運算題

★☆題目32(整數(shù)各位打散組合運算題)

已知數(shù)據(jù)文件IN.DAT中存有200個四位數(shù)，并已調(diào)用讀函數(shù)readDatO把這些數(shù)存

人數(shù)組a中，請考生編制一函數(shù)jsValO,其功能是：把千位數(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ù)ent.最后main。函數(shù)調(diào)用寫函數(shù)

writeDat()把結(jié)果ent以及數(shù)組b中符合條件的四位數(shù)輸出到OUT.DAT文件中。

voidjsVal0

{inti,j,thou,hun,ten,data,ab,cd;

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

{thou=a[i]/1000;hun=a⑴%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==l&&cd%2==l&&ab>=l0&&cd>=l0)

b[cnt++]=a[i];

)

for(i=0;i<cnt-l;i++)

for(j=i+l;j<cnt;j++)

if(b[i]<b[j])[thou=b[i];b[i]=b[j];b[j]=thou;}

)

☆題目33(整數(shù)各位打散組合運算題)

已知數(shù)據(jù)文件IN.DAT中存有200個四位數(shù)，并已調(diào)用讀函數(shù)readDatO把這些數(shù)存

入數(shù)組a中，請考生編制一函數(shù)jsValO,其功能是：把千位數(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>=10且ab-cd<=20且兩個數(shù)均是偶數(shù),

同時兩個新數(shù)的十位數(shù)字均不為零,則將滿足此條件的四位數(shù)按從大到小的順序存入

數(shù)組b中,并要計算滿足上述條件的四位數(shù)的個數(shù)ent。

voidjsVal0

{inti,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>=l0&&ab-cd<=20&&ab%2==0&&cd%2==0&&qw!=0&&gw!=0)

b[cnt++]=a[i];

)

for(i=0;i<cnt-l;i++)

for(j=i+l;j<cnt;j++)

if(b⑴<b[j]){qw=b[i];b[i]=b[j];b[j]=qw;}

)

★☆題目34(整數(shù)各位打散組合運算題)

沒有提供求素數(shù)函數(shù)isprimeO,可自己編制

已知數(shù)據(jù)文件IN.DAT中存有200個四位數(shù)，并已調(diào)用讀函數(shù)readDatO把這些數(shù)存

入數(shù)組a中，請考生編制一函數(shù)jsValO,其功能是：把千位數(shù)字和十位數(shù)字重新組

成一個新的十位數(shù)(新十位數(shù)的十位數(shù)字是原四位數(shù)的千位數(shù)字，新十位數(shù)的個位數(shù)

字是原四位數(shù)的十位數(shù)字),以及把個位數(shù)字和百位數(shù)字組成另一個新的十位數(shù)(新

十位數(shù)的十位數(shù)字是原四位數(shù)的個位數(shù)字，新十位數(shù)的個位數(shù)字是原四位數(shù)的百位數(shù)

字),如果新組成的兩個十位數(shù)均是素數(shù)且新數(shù)的十位數(shù)字均不為零,則將滿足此條

件的四位數(shù)按從大到小的順序存入數(shù)組b中,并要計算滿足上述條件的四位數(shù)的個數(shù)

ent。最后main()函數(shù)調(diào)用寫函數(shù)writeDat()把結(jié)果ent以及數(shù)組b中符合條件的四

位數(shù)輸出到OUT.DAT文件中。

intisprime(intm)

{inti;

for(i=2;i<=m/2;i++)

if(m%i==0)return0;

return1;

voidjsVal0

{inti,j,qw,bw,sw,gw;

intab,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>=l0&&cd>=l0)b[cnt++]=a[i];

}

for(i=0;i<cnt-l;i++)

for(j=i+l;j<cnt;j++)

if(b[i]<b[j]){qw=b[i];b[i]=b[j];b[j]=qw;}

)

題目35(整數(shù)各位打散組合運算題)

已知數(shù)據(jù)文件IN.DAT中存有200個四位數(shù)，并已調(diào)用讀函數(shù)readDatO把這些數(shù)存

入數(shù)組a中，請考生編制一函數(shù)jsValO,其功能是：把千位數(shù)字和個位數(shù)字重新組

成一個新的十位數(shù)(新十位數(shù)的十位數(shù)字是原四位數(shù)的千位數(shù)字,新十位數(shù)的個位數(shù)

字是原四位數(shù)的個位數(shù)字),以及把百位數(shù)字和十位數(shù)字組成另一個新的十位數(shù)(新

十位數(shù)的十位數(shù)字是原四位數(shù)的百位數(shù)字,新十位數(shù)的個位數(shù)字是原四位數(shù)的十位數(shù)

字),如果新組成的兩個十位數(shù)均是奇數(shù)并且兩個十位數(shù)中至少有一個數(shù)能被5整除,

同時兩個新數(shù)的十位數(shù)字均不為零,則將滿足此條件的四位數(shù)按從大到小的順序存入

數(shù)組b中,并要計算滿足上述條件的四位數(shù)的個數(shù)ent。最后main()函數(shù)調(diào)用寫函數(shù)

writeDat()把結(jié)果ent以及數(shù)組b中符合條件的四位數(shù)輸出到OUT.DAT文件中。

voidjsVal()

{inti,thou,hun,ten,data,j;

intab,cd;

for(i=0;i<MAX;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==01Icd%5==0)&&ab>=10&&cd>=10)b[cnt++]=a[i];

)

for(i=0;i<cnt-l;i++)

for(j=i+l;j<cnt;j++)

if(b[i]<b[j]){data=b[i];b[i]=b[j];b[j]=data;}

}

★題目36(整數(shù)各位打散組合運算題題)

已知數(shù)據(jù)文件IN.DAT中存有200個四位數(shù)，并已調(diào)用讀函數(shù)readDatO把這些數(shù)存

人數(shù)組a中，請考生編制一函數(shù)jsValO,其功能是：把千位數(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,ab必須是奇數(shù)且不能被5整除,cd必

須是偶數(shù),同時兩個新數(shù)的十位數(shù)字均不為零,則將滿足此條件的四位數(shù)按從大到小

的順序存入數(shù)組b中,并要計算滿足上述條件的四位數(shù)的個數(shù)ent.最后main。函數(shù)

調(diào)用寫函數(shù)writeDatO把結(jié)果ent以及數(shù)組b中符合條件的四位數(shù)輸出到OUT.DAT

文件中。

voidjsVal0

{inti,thou,hun,ten,data,j;

intab,cd;

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

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

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

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

if(((ab-cd)<0&&ab%2==l&&ab%5!=0)&&cd%2!=1&&ab>=l0&&cd>=l0)

{b[ent]=a[i];cnt++;}

)

for(i=0;i<cnt-l;i++)

for(j=i+l;j<cnt;j++)

if(b[i]<b[j]){data=b[i];b[i]=b[j];b[j]=data;}

)

題目37(整數(shù)各位打散組合運算題)

已知數(shù)據(jù)文件IN.DAT中存有200個四位數(shù)，并已調(diào)用讀函數(shù)readDatO把這些數(shù)存

入數(shù)組a中，請考生編制一函數(shù)jsValO,其功能是：把個位數(shù)字和千位數(shù)字重新組

成一個新的十位數(shù)(新十位數(shù)的十位數(shù)字是原四位數(shù)的個位數(shù)字,新十位數(shù)的個位數(shù)

字是原四位數(shù)的千位數(shù)字),以及把百位數(shù)字和十位數(shù)字組成另一個新的十位數(shù)(新

十位數(shù)的十位數(shù)字是原四位數(shù)的百位數(shù)字,新十位數(shù)的個位數(shù)字是原四位數(shù)的十位數(shù)

字),如果新組成的兩個十位數(shù)均是偶數(shù)并且兩個十位數(shù)中至少有一個數(shù)能被9整除,

同時兩個新數(shù)的十位數(shù)字均不為零,則將滿足此條件捌四位數(shù)按從大到小的順序存入

數(shù)組b中,并要計算滿足上述條件的四位數(shù)的個數(shù)ent。最后main。函數(shù)調(diào)用寫函數(shù)

writeDat()把結(jié)果ent以及數(shù)組b中符合條件的四位數(shù)輸出到OUT.DAT文件中。

voidjsVal0

{inti,j,thou,hun,ten,data,ab,cd;

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

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

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

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

if((ab%9==011cd%9==0)&&ab%2==0&&cd%2==0&&hun!=0&&data1=0)

{b[cnt]=a[i];cnt++;)

)

for(i=0;i<cnt-l;i++)

for(j=i+l;j<cnt;j++)

if(b[i]<b[j]){data=b[i];b[i]=b[j];b[j]=data;}

}

★題目38(整數(shù)各位打散組合運算題)

已知數(shù)據(jù)文件IN.DAT中存有200個四位數(shù)，并已調(diào)用讀函數(shù)readDatO把這些數(shù)存

人數(shù)組a中，請考生編制一函數(shù)jsValO,其功能是：把個位數(shù)字和千位數(shù)字重新組

成一個新的十位數(shù)(新十位數(shù)的十位數(shù)字是原四位數(shù)的個位數(shù)字,新十位數(shù)的個位數(shù)

字