《三级网络上机归类.doc》由会员分享，可在线阅读，更多相关《三级网络上机归类.doc（46页珍藏版）》请在金锄头文库上搜索。
1、一、300个四位数1、题目27：已知数据文件IN.DAT中存有300个四位数，并已调用读函数ReadDat()把这些数存入数组a中，请编制一函数jsvalue()，其功能是：求出千位数上的数减百位数减十位数上的数减个位数上的数大于零的个数cnt，再求出所有满足此条件的四位数平均值pjz1，以及不满足此条件的四位数平均值pjz2，最后调用写函数writeDat()把结果输出到OUT.DAT文件。 例如：9123,9-1-2-30，则该数满足条件计算平均值pjz1，且个数cnt=cnt+1。 9812,9-8-1-20,则该数不满足条件计算平均值pjz2. 注意：部分源程序已给出。 程序中已定义数
2、组：a300，已定义变量：cnt 请勿改动主函数main()、读函数ReadDat()和写函数writeDat()的内容。-void jsValue() /*标准答案*/int I,thou,hun,ten,data,j;for(I=0;I0)bcnt=aI;cnt+; for(I=0;Icnt-1;I+) for(j=I+1;jbj) data=bI; bI=bj; bj=data;题目48：已知数据文件IN.DAT中存有300个四位数,并已调用读函数READDAT()把这些数存入数组A中.请编制一函数SVALUE(),其功能是:求出千位数上的数加个位数上的数等于百位数上的数加十位数上的数的
3、个数CNT,再把所有满足条件的四位数依次存入数组bb中,然后对数组bb的四位数按从小到大的顺序进行排序,最后调用写函数WRITEDAT()把数组b中的数输出到OUT.DAT文件. 例如:6712,6+2=7+1,则该数满足条件存入数组bb中,且个数CNT=CNT+1. 8129,8+12+9,则该数不满足条件忽略. 注意：部分源程序已给出。 程序中已定义数组：a300，已定义变量：cnt 请勿改动主函数main()、读函数ReadDat()和写函数writeDat()的内容。- void jsValue() /*标准答案*/int I,thou,hun,ten,data,j;for(I=0;I
4、300;I+) thou=aI/1000; hun=aI%1000/100; ten=aI%100/10; data=aI%10; if (thou+data=hun+ten)bcnt=aI;cnt+; for(I=0;Icnt-1;I+) for(j=I+1;jbj) data=bI; bI=bj; bj=data;题目49：已知数据文件IN.DAT中存有300个四位数，并已调用读函数ReadDat()把这些数存入数组a中，请编制一函数jsvalue()，其功能是：求出千位数上的数减百位数减十位数上的数减个位数上的数大于零的个数cnt，再求出所有满足此条件的四位数平均值pjz1，以及不满足此
5、条件的四位数平均值pjz2，最后调用写函数writeDat()把结果输出到OUT.DAT文件。 例如：9123,9-1-2-30，则该数满足条件计算平均值pjz1，且个数cnt=cnt+1。 9812,9-8-1-20,则该数不满足条件计算平均值pjz2. 注意：部分源程序已给出。 程序中已定义数组：a300，已定义变量：cnt 请勿改动主函数main()、读函数ReadDat()和写函数writeDat()的内容。-void jsValue() /*标准答案*/int I,thou,hun,ten,data,n=0;for(I=0;I0) cnt+;pjz1+=aI; else n+;pjz
6、2+=aI; pjz1/=cnt;pjz2/=n;题目53：已知数据文件IN.DAT中存有300个四位数,并已调用读函数READDAT()把这些数存入数组A中.请编制一函数SVALUE(),其功能是:求出个位数上的数减千位数上的数减百位数上的数减十位数上的数大于零的个数cnt，再把所有满足此条件的四位数依次存入数组b中，然后对数组b的四位数按从大到小的顺序进行排序，最后调用写函数WRITEDAT()把数组b中的数输出到OUT.DAT文件. 例如：1239，9-1-2-30，则该数满足条件存入数组b中，且个数cnt=cnt+1. 8129，9-8-1-20，则该数不满足条件忽略。 注意：部分源程
7、序已给出。 程序中已定义数组：a300，已定义变量：cnt 请勿改动主函数main()、读函数ReadDat()和写函数writeDat()的内容。-void jsValue() /*标准答案*/int I,thou,hun,ten,data,j;for(I=0;I0)bcnt=aI;cnt+; for(I=0;Icnt-1;I+) for(j=I+1;jcnt;j+) if(bIbj) data=bI; bI=bj;bj=data;题目54：已知数据文件IN.DAT中存有300个四位数,并已调用读函数READDAT()把这些数存入数组A中.请编制一函数SVALUE(),其功能是:求出千位数上
8、的数加个位数上的数等于百位数上的数加十位数上的数的个数CNT,再把所有满足条件的四位数依次存入数组b中,然后对数组b的四位数按从大到小的顺序进行排序,最后调用写函数WRITEDAT()把数组b中的数输出到OUT.DAT文件. 例如:7153,7+1=5+3,则该数满足条件存入数组bb中,且个数CNT=CNT+1. 8129,8+12+9,则该数不满足条件忽略. 注意：部分源程序已给出。 程序中已定义数组：a300，已定义变量：cnt 请勿改动主函数main()、读函数ReadDat()和写函数writeDat()的内容。-void jsValue() /*标准答案*/int I,thou,hu
9、n,ten,data,j;for(I=0;I300;I+) thou=aI/1000; hun=aI%1000/100; ten=aI%100/10; data=aI%10; if (thou+hun=data+ten)bcnt=aI;cnt+; for(I=0;Icnt-1;I+) for(j=I+1;jcnt;j+) if(bIbj) data=bI;bI=bj;bj=data;或者：jsValue()int q,b,s,g,i,j;for(i=0;i300;i+)q=ai/1000;b=ai/100%10;s=ai/10%10;g=ai%10;if(q+g=b+s)bcnt+=ai;fo
10、r(i=0;icnt-1;i+)for(j=i+1;j bj)q=bi;bi=bj;bj=q;jsvalue() int i,k,m,a1,a2,a3,a4,j=0; for(i=0;i300;i+) a1=ai/1000; a2=(ai%1000)/100; a3=(ai%100)/10; a4=ai%10; if(a1+a2=a3+a4) cnt+; bj+=ai; for(i=0;icnt;i+) for(k=i+1;kcnt;k+) if(bibk) m=bi;bi=bk;bk=m;题目55：已知数据文件IN.DAT中存有300个四位数,并已调用读函数READDAT()把这些数存入数组
11、A中.请编制一函数SVALUE(),其功能是:求出所有这些四位数是素数的个数cnt，再把所有满足此条件的四位数依次存入数组b中，然后对数组b的四位数按从小到大的顺序进行排序，最后调用写函数writeDat()把结果输出到OUT.DAT文件。 例如：5591是素数，则该数满足条件存入数组b中，且个数cnt=cnt+1。 9812是非素数，则该数不满足条件忽略。 注意：部分源程序已给出。 程序中已定义数组：a300，b300，已定义变量：cnt 请勿改动主函数main()、读函数ReadDat()和写函数writeDat()的内容。-void jsValue() /*标准答案*/int j,I,v
12、alue; for(I=0;I300;I+) if(isP(aI) bcnt=aI;cnt+; for(I=0;Icnt-1;I+) for(j=I+1;jbj) value=bI; bI=bj; bj=value;题目80：已知数据文件IN.DAT中存有300个四位数,并已调用读函数READDAT()把这些数存入数组A中.请编制一函数SVALUE(),其功能是:求出个位数上的数减千位数上的数减百位数上的数减十位数上的数大于零的个数cnt，再求出所有满足此条件的四位数平均值pjz1，以及不满足此条件的四位数平均值pjz2， 例如：1239，9-1-2-30，则该数满足条件计算平均值pjz1，且个数cnt=cnt+1。 8129，9-8-1-20，则该数不满足条件计算平均值pjz2. 注意：部分源程序已给出。 程序中已定义数组：a300，已定义变量：cnt,pjz1,pjz2. 请勿改动主函数main()、读函数ReadDat()和写函数writeDat()的内容。-
