全国2024年全国计算机三级网络技术上机真题100道常规题

2024年全国计算机三级网络技术上机真题100道常规题四位数各位上的数字均是0或2或4或6或8,则统计出满意此条件

的个数ent,并把这些四位数按从大到小的依次存入数组b中。最终

☆题目1main()函数调用写函数wrileDat。把结果ent以及数组b中符合条件

函数KcadDat()实现从文件IN.DA1中读取一篇英文文章存入到字符的四位数输出到OU1.DAT文件中。

串数组xx中；请编制函数StrOR(),其函数的功能是：以行为单位依voidjsVal()

次把字符串中全部小写字母。左边的字符串内容移到该串的右边存{intij,qwjiw,sw,gw;

放，然后把小写字母。删除，余下的字符串内容移到已处理字符串的for(i=0;i<MAX;i++)

左边存放，之后把己处理的字符串仍按行重新存入字符串数组xx中。{qw=a|i]/1000;bw=a[i]/100%10;

最终main。函数调用函数WriteDatO把结果xx输出到文件sw=a|i]%100/10;gw=aliJ%10;

OUT5.DAT中if(qw&&qw%2==0&&bw%2==0&&sw%l==0&&gw%2==0)

b|cnt++]=a[ij;

voidStrOR(void)}

{inti,rightoj,s,k;for(i=0;i<cnt-l;i++)

chartem[80];for(j=i+1;j<cnt;j++)

for(i=0;i<maxline;i++)if(bli]<bU]){qw=b[i];b[i]=b[j];b[j]=qw;}

for(j=strlen(xx|iJ)-l;j>=0;j-)

}

(k=0；★题目3(字符型题)

memset(tem,0,80);

请编写一个函数jsValuc(intm,intk,int该函数的功能是：将大

if(xx皿]==*)

{righto=j;于整数m且紧靠m的k个素数存入数组xx传回。

for(s=righto+l;s<strlcn(xx[ij);s++)最终调用函数writeDatO读取10组数据，分别得出结果且把结果

tem[k++]=xx[i][s];输出到文件。ut.dat中。

for(s=0;s<righto;s++)部分源程序存在文件progl.c中。

if(xx[i][s]!='o,)例如：若输入175则应输出：19,23,29,31,37。

tem|k++]=xxfi][s|;请勿改动主函数main。和写函数writeDat。的内容。

strcpv(xx|i],tem);

intisP(intm)

}

elsecontinue;(

}}inti;

题目2for(i=2;i<in;i++)

己知数据文件IN.DAT中存有200个四位数，并弓调用读函数rcadDatOif(m%i«0)r€turn0;

把这些数存入数组a中，请考生编制一函数jsVal(),其功能是：假如return1;

}for(m=l;m<=k;m++)

voidnumfintni,intk,intxx[])str|s++]=xx[i][j+ni];

{ints=();str[s]='\O';

for(ni=m+l;k>O;m++)strcpy(xx[i],str);}

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

☆题目5(整数排序题)

}

在文件in.dat中有200个正整数，且每个数均在1000至9999之间.

★题目4(字符处理一发序输出)函数ReadDatO读取这200个数存放到数组aa中，请编制函数JsSorl。,

函数ReadDat()实现从文件IN.DAT中读取一篇英文文章存入到字符其函数的功能是：要求按每个数的后三位的大小进行升序排列，然后

串数组xx中，请编制函数StrOL(),其函数的功能是：以行为单位对取出满意此条件的前10个数依次存入数组bb中，假如后三位的数值

行中以空格或标点符号为分隔的全部单词进行倒排。最终把己处理的相等，则按原先的数值进行降序排列。最终调用函数WrileDat。把结

字符串(应不含标点符号)仍按行重新存入字符串数组xx中，最终调果bb输出到文件ouldal中。

用函数writeDatO把结果xx输出到文件OUT6.DAT中。例：史理前601250999012702580h«

例如：原文：YouHeMe史理后901260127«25808850缈

Iamastudent.voidjsSort()

结果：MeHeYou{intij,data;

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

voidStrOL(void)for(j=i+1y<2(H);j++)

{intij,k,s,m,strl;ir(aa[i]%100()>aa[j]%1000||aa[i]%1(MM)==aa|j]%1000&&aa[iJ<aa|j])

charstr[80];{data=aa[i;aa|i]=aa(j];aa(j|=data;}

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

{strl=strlen(xx|il);

bb[i]=aa[i];

memset(str.0,80);

s=k=0;|

for(j=strl-ly>=Oy-)☆题目6正整数排序

{if(isalpha(xx[i][j]))k++;在文件in.dat中有200个正整数，且每个数均在1000至9999之间。

else{for(ni=l;ni<=k;m++)函数ReadDatO读取这200个数存放到数组aa中，请编制函数jsSorlO,

str[s++]=xx[i][j+m];其函数的功能是：要求按每个数的后三位的大小进行降序排列，然后

k=0;取出满意此条件的前10个数依次存入数组b中,假如后三位的数值相

)等,则按原先的数值进行升序排列。最终调用函数WriteDatO把结果

if(!isalpha(xxfinjD)

bb输出到文件oul.dat中。

str[s++|='

例：处理前90125099601270258088

处理后5099808X702560129012调用函数WrileDatO把结果xx输出到文件PS1.DAT中。

voidjsSort()替代关系：f(p)=p*llmod256(p是数组中某一个字符的ASCII

{intiJ,data;值，f(p)是计算后新字符的ASCII值)，假如计算后f(p)值小于等于32

for(i=0;i<199;i++)或大于130,则该字符不变，否则将f(p)所对应的字符进行替代。(留

for(j=i+l;j<200;j++)意中间变量用无符号整型)，部分源程序存在文件progLc中。原始数

if(aa|i]%100()<aa[j]%1000||aa[i]%1000==aa[j]%1000&&aa[i]>aa[j])据文件存放的格式是：每行的宽度均小于80个字符。

{data=aa|i|;au[i]=aa(j];aa(j]=data;}voidencryptChar()

f()r(i=0;i<10;i++){intij;

bb[ij=aa|i);}for(i=0;i<maxline;i++)

☆题目7(结构体操作题》for(j=i)y<strlen(xx[i])y++)

已知在文件IN.DAT中存有100个产品销售记录，每个产品销售记录if(xxli||j|*ll%256<=32||xxli||j]*ll%256>130)continue;

由产品代码dm(字符型4位)，产品名称me(字符型10位)，单价dj(整elsexxlil|jj=xx[ij|jj*11%256;

型)，数量3(整型)，金额je(长整型)五部分组成。其中：金额=单价*}

数量计算得出。函数ReadDat。是读取这100个销售记录并存入结构★☆题目9(字符串排序题)

数组sell中。请编制函数SorlDat。，其功能要求：按产品代码从大到函数ReadDatO实现从文件IN.DAT中读取一篇英文文章存入到字符

小进行排列，若产品代码相同，则按金额从大到小进行排列，最终排串数组xx中，请编制函数SortCharDO,其函数的功能是：以行为单

列结果仍存入结构数组sell中，最终调用函数WriteDatO把结果输出位对字符按从大到小的依次进行排序，排序后的结果仍按行重新存入

到文件OUT6.DAT中。字符串数组xx中，最终调用函数writeDatO把结果xx输出到文件

voidSortDatf)OUT2.DAT中。

{intij;例：原文：dAe,BfC.

PROxy;CCbbAA

for(i=0;i<99;i++)组果：fcdCBA.

for(j=i+l;j<100;j++)bbCCAA

if(strcmp(se)l[i].dm^ell[j].din)<O||strcmp(seU[i].dm^ell(j].dm)==O&&voidSortCharD(void)

sell[i).je<sell(j].je){intij,k,strl;

{xy=sell|ij;sell[i]=sell[j];sell[j]=xy;}}charch;

★题目8(字符替换题)for(i=0;i<niaxline;i++)

函数RcadDa")实现从文件ENG.IN中读取一篇英文文章，存入到字(strl=strlen(xx(ij);

符串数组xx中；请编制函数cncryptChar(),或给定的替代关系对数for(j-Oj<strl-ly11)

组xx中的全部字符进行替代，仍存入数组XX的对应的位置上，最终for(k=j+l;k<strl;k++)

if(xx[i][j]<xx[i][k])(intI;

{ch=xx[injl；xx[iHj]=xx[i]|kj;xx|iHk|=ch;}}}for(I=0;I<strlen(s);I++)

★☆题目10(替换字符题)if(s[i]=='力网i]=='Z')s[i]-=25;

函数ReadDatO实现从文件1N.DAT中读取一篇英文文章存入到字符elseif(Mil>='a'&&Mi]<='y'lh[i]>='A,&&Mi|<=，V)«|i|+=l；

串数组xx中，请编制函数ConvertCharAO,其函数的功能是：以行}

为单位把字符串中的全部小写字母改写成该字时的下一个字母，假如★☆题目12(结构体运算题题)

是字母z,则改写成字母a。大写字母仍为大写字母，小写字母仍为小已知在文件IN.DAT中存有】00个产品销售记录，每个产品销售记录

写字母，其他字符不变。把己处理的字符串仍按行重新存入字符串数由产品代码dm(字符型4位)，产品名称me(字符型10位)，单价可(整

组xx中，最终调用函数wrileDatO把结果xx输出到文件OUT1.DAT型)，数量si(整型)，金额je(长整型)五部分组成。其中：金额=单价*

中。数量计算得出。函数ReadDatO是读取这100个销售记录并存入结构

例：原文：Adb.Bcdza数组sell中。请编制函数SorlDat。，其功能要求：

abck.LLhj按产品名称从小到大进行排列，若产品名称相等，则按金额从小到大

结果：Aec.Bdcab进行排列，最终排列结果仍存入结构数组sell中，

bcdl.LLikvoidSoriDat。

voidConvertCharA(void){intij；

(intij;PROxy;

for(i=0;i<maxline;i++)for(i=0;i<99;i++)

{fonj=0;j<strlen(xx|iJ)y++)for(j=i+ly<100y++)

if(xxli]Ul=='z')xx[i][j]=3;if(strcmp(sell[i].mc^ell[j].mc)>O||strcmp(sell[i].mc^sell(jJ.mc)=O&&se

elseif(xx[i]U]>='a'&&xxliJU]<=,y')xx[i][jj+=l;ll(i].je>sell[j].je)

1I{xy=sel][i];sell[i]=sell[j]^ell[j]=xy;}

☆题目11(字符串字母移位题)}

程序progl.c的功能是：把s字符串中的全部字母改写成该字母的下题目13(结构体运算题)

一个字母，字母z改写成字母a。要求大写字母仍为大写字母，小写已知在文件IN.DAT中存有100个产品销售记录，每个产品销售记录

字母仍为小写字母，其它字符不做变更。由产品代码dm(字符型4位)，产品名称me(字符型10位)，单价dj(整

请考生编写函数chg(char*s)实现程序要求，最终调用函数型)，数量4(整型)，金额je(长整型)五部分组成。其中：金额=单价*

rcadwritcDAT()把结果输出到文件beLout中。数量计算得出。函数RcadDaU)是读取这100个销售记录并存入结构

例如：s字符串中原有的内容为：Mn.l23Zxy,则调用该函数后，数组sell中.请编制函数SortDatO,其功能

结果为：No.l23Ayz.要求：按产品代码从小到大进行排列，若产品代码相等，则按金额从

voidchg(char*s)大到小进行排列，最终排列结果仍存入结构数组sell中，最终调用函

数\VriteDal()把结果输出到文件OUT9.DAT中。★题目15(整数各位数字运算排序题)

voidSortDat()已知数据文件IN.DAT中存有200个四位数，并已调用读函数readDatO

{intij;把这些数存入数组a中，请考生编制一函数jsVal(),其功能是：若一

PROxy;个四位数的千位数字上的值小于等于百位数字上的值，百位数字上的

for(i=0;i<99;i++)值小于等于十位数字上的值，以及十位数字上的值小于等于个位数字

for(j=i+l;j<100;j++)上的值，并且原四位数是偶数，则统计出满意此条件的个数ent并把

if(strcnipisell|i].dm^*ell(j].dm)>O||strcinp(seII[il.dm,sell|j|.dni)==O&&s这些四位数按从小到大的依次存入数组b中，最终调用写函数

ell[i].je<sell[j].je)writeDal()把结果ent以及数组b中符合条件的四位数输出到

{xy=sell|i];sell|ij=sell[j|;selllj]=xy;}OUT.DAT文件中。

}voidjsVal()

★☆题目14(整数统计排序题){intij;

已知数据文件IN.OAT中存有200个四位数，并三调用读函数readDaK)intqw,bw^»w,gw;

把这些数存入数组a中，请考生编制一函数jsVal。，其功能是：依次for(i=0;i<MAX;i++)

从数组a中取出一个四位数，假如该四位数连续大于该四位数以后的(qw=a|iJ/10()();bw=a[iJ%1000/l(M);

五个数且该数是奇数(该四位数以后不满五个数，则不统计)，则统计sw=ali]%100/10;gw=aliJ%10;

出满意此条件的个数ent并把这些四位数按从小到大的依次存入数组if((qw<=bw)&&(bw<=sw)&&(sw<=gw)&&(a[i]%2==0))

b中，最终调用写函数writeDat()把结果ent以及数组b中符合条件b|cnt++]=a[i];

的四位数输出到OUT.DAT文件中。}

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

{intijjlae;;for(j=i+ly<cnt;j++)

for(i=0;i<MAX-5;i++)if(blij>b|jj){qw=b[i];b|i|=b[j];blj]=qw;}

{for(j=i+1;j<=i+5;j++)}

if(a|i]>a|j]&&a[i]%2)Hag=l;★☆题目16(字符替换题)

else{flag=O;break;}函数ReadDatO实现从文件IN.DAT中读取一篇英文文章存入到字符

if(flag==l)b(cnt++]=a|i);串数组xx中，请编制函数StrCharJRO,其函数的功能是：以行为单

}位把字符串中全部字符的ASCII值右移4位,然后把右移后的字符

for(i=0;i<cnt-l;i++)ASCII值再加上原字符的ASCII值，得到新的字符仍存入原字符串对

for(j=i+l;j<cntd++)应的位置上.最终把己处理的字符串仍按行重新存入字符串数组XX

if(b[i]>b[j])(nag-b[i]；b[i]-bU]；b[j]-nag;]中，最线调用函数writcDatO把结果xx输出到文件OUT8.DAT中。

}voidStrCharJRO

{intij;调用函数WriteDat()把结果xx输出到文件PS10.DAT中。

for(i=0;i<niaxline;i++)替代关系：f(p)=p*llmod256(p是数组中某一个字符的ASCII

for(j=l);j<strlen(xx|i]);j++)值，f(p)是计算后新字符的ASCII值)，假如原字符的ASCII值是偶

xx[ij(j]»"(xx|iJUJ»4);(右移四位的表达方式)数或计算后f(p)值小于等于32,则该字符不交，否则将f(p)所对应的

}字符进行善代。

☆题目17(字符替换题)voidencryptChar()

函数READDAT()实现从文件IN.DAT中读取一篇英文文章存入到(intij;

字符串数组XX中;请编制函数CHA。,其函数功能是:以行为单位把字for(i=0;i<maxline;i++)

符串中的第一个字符的ASCH值加其次个字符的ASCII值，得到第一for(j=()j<strlen(xx|i])y++)

个亲朋字符，其次个字符的ASCII值加第三个字符的ASCII值，得到if(xx|i||j]*ll%256<=32||xxli]|j]%2==0)continue;

其次个新字符，依此类推始终处理到最终其次个字符，最终一个字符elsexx[illjl=xx[i][jj*ll%256;

的ASCII值加原第一个字符的ASCII值，得到最终一个新的字符，得}

到的新字符分别存放在原字符串对应的位置上.最终把己处理的字符☆题目19(单词个数统计题)

串逆转后按行重新存入字符串数组XX中,最终调用函数WRITEDATO编写一个函数findStr(char*str,char*substr),该函数统id■一个长度为

把结果XX输出到文件0UT9.DAT中.原始数据文件存放的格式是:每2的子字符串在另一个字符串中出现的次数。例如，假定输入的字符

行的宽度均小于80个字符，含标点符号和空格.串为"asdasasdfgasdaszx67asdmklo",子字符串为"as",函数返回

voidChA(void)值是6。(表明白返回值是整数型)

{intij;函数RcadWriteO实现从文件in.dat中读取两个字符串，并调用

charch;函数findStrO，最终把结果输出到文件out.dat中。

for(i=0;i<niaxline;i++)intHndStr(char*str,char*substr)

{ch=xx[i][0];{intiJ,lenl,len2,cnt=O,flag;

for(j=0;j<strlen(xx[i])-l;j++)lenl=strlen(str);

XK[iJUJ+=xxliJU+lJ;Ien2=strlen(substr);

xx[i][strlen(xx[i])-l]+=ch;for(i=0;i<lenl;i++)

strrev(xx[i]);{for(j=0^j<len2;j++)

}}if(str|i+j]==substr[jj)flag=l;

☆题目18else{flag=O;break;}

函数RcadDa")实现从文件ENG.IN中读取一篇英文文章，存入到字if(flag==l)cnt++;

符串数组xx中；请编制函数cncryptChar(),於给定的替代关系对数)

组xx中的全部字符进行替代，仍存入数组XX的对应的位置上，最终returnent;

}do(x0=xl;

★题目20(Fibonacci数列题)xl=€()s(x0);

编写函数jsV'alue,它的功能是：求Fibonacci数列中大于I的最小的}while(labs(x0-x1)>=0.()00001);

一个数，结果由函数返回。其中Fibonacci数列F(n)的定义为；returnxl;}

F(0)=0,F(l)=l注：本题在无忧或捷成模拟盘中，需定义doublex0,xl;才能通过，据

F(n)=F(n-l)+F(n-2)事实上机拍到该题的考生反映，事实上机需按上面解法的定义方能通

过，特此说明，供参考。

最终调用函数wrileDat。读取50个数据tt分别得出结果且把结

果输出到文件out.dat中。★题目22(平方根问题)

例如：当1=1000时，函数值为：1597.请编写函数counlValue(),它的功能是：求n以内(不包括n)同时能

intjsValue(intt)被3与7整除的全部自然数之和的平方根s,并作为函数值返回，最

{intro=0Jl=l,fn;终结果s输出到文件。ut.dat中。

fn=fi)+fl;例如若n为1000时，函数值应为：s=153.<W9064o

while(fn<=t)doublecountValue!intn)

{ro=n；{inti;

fl=fn;doubles=0.0;

fn=f»+fl;for(i=l;i<n;i++)

}returnfn;}if(i%21==0)s+=i;

☆题目21(迭代方法求方程题)returnsqrt(s);}

下列程序progl.c的功能是：利用以下所示的简洁迭代方法求方程：题目23(实数运算题)

cos(x)-x=0的一个实根。已知在文件in.dat中存有N个(个数<200)实数，函数rcaddatO读取

Xn+l=cos(Xn)这N个实数并存入数组xx中。请编制函数calvalucO,其功能要求：

迭代步骤如下：(1)取XI初值为0.0；1、求出这N个实数的平均值aver；

(2)X0=XL把XI的值赋给X0；(3)Xl=cos(X0),求出一个新的XI；2、分别求出这N个实数的整数部分之和sumint以及小数部分之和

(4)若X0-X1的确定值小于0.000001,执行步骤(5),否则执行步骤(2)；sumdec>最终调用函数writeda")把所求的结果输出到文件out.dat中。

⑸所求XI就是方程cos(X)-X=0的一个实根，作为函数值返回。留意：部分源程序已给出。

请编写函数countVahicO实现程序的要求，最终调用函数voidCalValue(void)

writcDatO把结果输出到文件OUT17.DAT中。(inti;

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

{float\0^1;{sumint•"(long)xx[i];

x1=0.0;suindec+=xx[i]-(long)xx[i];

aver+=xx[i];for(i=0;i<half;i++)

}aver/=N;Jif(xy(i]!=xy[-strl])break;

题目24(完全平方数问题)if(i>=half)return1;

下列程序progLc的功能是；在三位整数(100至999)中找寻符合条elsereturn0;

件的整数并依次从小到大存入数组中；它既是完全平方数，又是两位}

数字相同，例如144、676等。或者下面的解法：

请编制函数实现此功能，满意该条件的整数的个数通过所编制的intjsVahie(longn)

函数返回。(longintS=0,k;

intjsVa)ue(intbb[J)k=n;

{intiJ,k=O;while(k)

inthun,ten,data;{s=s*10<-k%10;

for(i=10;i<32;i++)k/=10;

)

if(s==n)return1;

hum=j/100;if(s!=n)return0;

ten=j%100/10;)

data=j%10;输出结果为：

if(hum==ten||hum==data||ten==data)m=121,m*m*m=1331

bb[k++]=j;)m=101,m*m=10201,m*m*m=1030301

returnk;}ni=lll,m*ni=12321,m*m*m=1367631

★题目25(回文数问题)★☆题目26(整数统计运算题)

下列程序的功能是：找寻并输出n至999之间的数m,它满意m,m2已知在文件IN.DAT中存有若干个(个数<200)四位数字的正整数，

和m3均为回文数。所谓回文数是指其各位数字左右对称的整数，例函数ReadDat()读取这若干个正整数并存入数组xx中。请编制函数

如121,676,94249等。满意上述条件的数如m=ll,m2=121.n13=1331CalValueO,其功能要求：1、求出这文件中共有多少个正整数totNum；

皆为回文数。请编制函数intsvaluc(longm)实现此功能，假如是回文2、求这些数右移I位后，产生的新数是偶数的数的个数totCnt,以及

数，则函数返回1,反之则返回0。最终把结果输出到文件。ut.dat中。满意此条件的这些数(右移前的值)的算术平均值totPjz,最终调用函数

intjsValucdongn)writeDatO七所求的结果输出到文件QUT.DAT中。

{inti^strkhalf;voidCalValue(void)

charxy[20];{inti,data;

ltoa(n,xy,10);/*留意这里不能运用itoa()函数，因为n是long型的*/for(i=0;i<MAXNUM;i++)

strl=strlen(xy);if(xx|i|>0)

half=strl/2;{totNum++;

data=xx[i]»l;字)，以及把个位数字和百位数字组成另一个新的十位数cd(新十位

if(data%2==0){totCnt++;totPjz+=xx[i];}数的十位数字是原四位数的个位数字，新十位数的个位数字是原四位

}数的百位数字)，假如新组成的两个十位数ab-cd>=0且ab-ccl<=10且

if(totCnt==0)totrjz-O；两个数均是奇数，同时两个新数的十位数字均不为零，则将满意此条

elsetotPjz/=totCnt;}件的四位数按从大到小的依次存入数组b中，并要计算满意上述条件

题目27(整数各位数字运算题)的四位数的个数ento最终main。函数调用写函数wrileDa")把结果

已知数据文件in.dat中存有300个四位数，并已调用读函数ReadDal。ent以及数组I)中符合条件的四位数输出到OUT.DAT文件中。

把这些数存入数组a中，请编制一函数jsVahieO,其功能是：求出千voidjsVal()

位数上的数减百位数上的数减十位数上的数减个位数上的数大于零的{intiJ,thou,hun,ten,data,ab,cd;

个数ent,再把全部满意此条件的四位数依次存入数组b中，然后对for(i=0;i<200;i++)

数组b的四位数按从小到大的依次进行排序，最终调用写函数{thou=a[i]/1000;hun=a[i]%1000/100;

writeDalO把结果输出到out.dat文件。ten=a|ij%100/10;data=aHJ%10;

例如：9123,9-1-2-3>0,则该数满意条件存入数组b中，且个数ab=10*thou+ten;cd=10*data+hun;

cnt=cnt+l.9812,9-8-1-2M),则该数不满意条件忽视。if((ab<d)>=0&&(ab-cd)<=10&&ab%2==l&&cd%2==l&&ab>=

jsValue()10&&cd>=10)

{intij,qw,bw^»w,gw;b|cnt++|=a(i|;

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

{qw=ali]/1000;bw=aliJ/l(H)%10;for(i=0;i<cnt-l;i++)

sw=a|ij%100/10;gw=a|i|%10;for(j=i+ly<cnt;j++)

if(qw-bw-sw-gw>0)b[cnl++]=a[i];lf(bIi]<bUJ){thou=b[ij;b[i]=bU];b[j]=thou;}

}}

for(i=0：i<cnt-1;i++)☆题目29(整数各位打散组合运算题)

for(j=i+l;j<cnt^++)已知数据文件IN.DAT中存有200个四位数，并已调用读函数rcadDatO

if(b[i]>b[j]){qw=b[ij;b[i]=b[j];b|j]=qw;}把这些数存入数组a中，请考生编制一函数JsVak),其功能是：把千

}