三级网络技术上机数位分解并重组后再筛选统计并排序

第27套已知数据文件IN.DAT中存有200个四位数, 并已调用读函数readDat()把这些数存入数组a 中,请考生编制一函数jsV al(),其功能是: 把千位数字和十位数字重新组成一个新的十位数ab(新十位数的十位数字是原四位数的千位数字,新十位数的个位数字是原四位数的十位数字), 以及把个位数字和百位数字组成另一个新的十位数cd (新十位数的十位数字是原四位数的个位数字,新十位数的个位数字是原四位数的百位数字), 如果新组成的两个十位数ab-cd>=0且ab-cd<=10且两个数均是奇数, 同时两个新数的十位数字均不为零,则将满足此条件的四位数按从大到小的顺序存入数组b中, 并要计算满足上述条件的四位数的个数cnt。

最后main()函数调用写函数writeDat( )把结果cnt以及数组b中符合条件的四位数输出到OUT.DAT文件中。

注意: 部分源程序存在文件PROG1.C文件中。

程序中已定义数组: a[200], b[200], 已定义变量: cnt请勿改动数据文件IN.DA T中的任何数据、主函数main()、读函数readDat()和写函数writeDat()的内容。

-------------------------void jsVal(){ int i,j; /* 定义变量 */int a1,a2,a3,a4;int ab,cd;int temp;for(i=0;i<MAX;i++){ a1=a[i]%10; /* 数位分解 */a2=a[i]%100/10;a3=a[i]%1000/100;a4=a[i]/1000;ab=a4*10+a2; /* 数位重组 */cd=a1*10+a3;if(ab-cd>=0&&ab-cd<=10&&ab%2==1&&cd%2==1&&a4!=0&&a1!=0) /* 判断条件 */b[cnt++]=a[i];}for(i=0;i<cnt-1;i++) /* 选择法排序 */for(j=i+1;j<cnt;j++)if(b[i]<b[j]){ temp=b[i];b[i]=b[j];b[j]=temp;}}第28套已知数据文件IN.DAT中存有200个四位数, 并已调用读函数readDat()把这些数存入数组a 中,请考生编制一函数jsVal(),其功能是: 把千位数字和个位数字重新组成一个新的十位数(新十位数的十位数字是原四位数的千位数字,新十位数的个位数字是原四位数的个位数字), 以及把十位数字和百位数字组成另一个新的十位数(新十位数的十位数字是原四位数的百位数字,新十位数的个位数字是原四位数的十位数字), 如果新组成的两个十位数均是奇数并且两个十位数中至少有一个能被5整除,同时两个新数的十位数字均不为零,则将满足此条件的四位数按从大到小的顺序存入数组b中, 并要计算满足上述条件的四位数的个数cnt。

最后main()函数调用写函数writeDat( )把结果cnt以及数组b中符合条件的四位数输出到OUT.DAT文件中。

注意: 部分源程序存在文件PROG1.C文件中。

程序中已定义数组: a[200], b[200], 已定义变量: cnt请勿改动数据文件IN.DA T中的任何数据、主函数main()、读函数readDat()和写函数writeDat()的内容。

-------------------------void jsVal(){ int i,j; /* 定义变量 */int a1,a2,a3,a4;int ab,cd;int temp;for(i=0;i<MAX;i++){ a1=a[i]%10; /* 数位分解 */a2=a[i]%100/10;a3=a[i]%1000/100;a4=a[i]/1000;ab=a4*10+a1; /* 数位重组 */cd=a3*10+a2;if(ab%2==1&&cd%2==1&&(ab%5==0||cd%5==0)&&a4!=0&&a3!=0) /* 判断条件 */b[cnt++]=a[i];}for(i=0;i<cnt-1;i++) /* 选择法排序 */for(j=i+1;j<cnt;j++)if(b[i]<b[j]){ temp=b[i];b[i]=b[j];b[j]=temp;}}第29套已知数据文件IN.DAT中存有200个四位数, 并已调用读函数readDat()把这些数存入数组a 中,请考生编制一函数jsV al(),其功能是: 把千位数字和十位数字重新组成一个新的十位数ab(新十位数的十位数字是原四位数的千位数字,新十位数的个位数字是原四位数的十位数字), 以及把个位数字和百位数字组成另一个新的十位数cd (新十位数的十位数字是原四位数的个位数字,新十位数的个位数字是原四位数的百位数字), 如果新组成的两个十位数ab-cd>=10且ab-cd<=20且两个数均是偶数,同时两个新数的十位数字均不为零,则将满足此条件的四位数按从大到小的顺序存入数组b中, 并要计算满足上述条件的四位数的个数cnt。

最后main()函数调用写函数writeDat( )把结果cnt以及数组b中符合条件的四位数输出到OUT.DAT文件中。

注意: 部分源程序存在文件PROG1.C文件中。

程序中已定义数组: a[200], b[200], 已定义变量: cnt请勿改动数据文件IN.DA T中的任何数据、主函数main()、读函数readDat()和写函数writeDat()的内容。

-------------------------void jsVal(){ int i,j; /* 定义变量 */int a1,a2,a3,a4;int ab,cd;int temp;for(i=0;i<MAX;i++){ a1=a[i]%10; /* 数位分解 */a2=a[i]%100/10;a3=a[i]%1000/100;a4=a[i]/1000;ab=a4*10+a2; /* 数位重组 */cd=a1*10+a3;if(ab-cd>=10&&ab-cd<=20&&ab%2==0&&cd%2==0&&a4!=0&&a1!=0) /* 判断条件 */b[cnt++]=a[i];}for(i=0;i<cnt-1;i++) /* 选择法排序 */for(j=i+1;j<cnt;j++)if(b[i]<b[j]){ temp=b[i];b[i]=b[j];b[j]=temp;}}第30套已知数据文件IN.DAT中存有200个四位数, 并已调用读函数readDat()把这些数存入数组a 中,请考生编制一函数jsVal(),其功能是: 把千位数字和十位数字重新组成一个新的十位数(新十位数的十位数字是原四位数的千位数字,新十位数的个位数字是原四位数的十位数字), 以及把个位数字和百位数字组成另一个新的十位数(新十位数的十位数字是原四位数的个位数字,新十位数的个位数字是原四位数的百位数字), 如果新组成的两个十位数均是素数,同时两个新数的十位数字均不为零,则将满足此条件的四位数按从大到小的顺序存入数组b 中, 并要计算满足上述条件的四位数的个数cnt。

最后main()函数调用写函数writeDat( )把结果cnt以及数组b中符合条件的四位数输出到OUT.DA T文件中。

注意: 部分源程序存在文件PROG1.C文件中。

程序中已定义数组: a[200], b[200], 已定义变量: cnt请勿改动数据文件IN.DA T中的任何数据、主函数main()、读函数readDat()和写函数writeDat()的内容。

-------------------------void jsVal(){ int i,j; /* 定义变量 */int a1,a2,a3,a4;int ab,cd;int temp;for(i=0;i<MAX;i++){ a1=a[i]%10; /* 数位分解 */a2=a[i]%100/10;a3=a[i]%1000/100;a4=a[i]/1000;ab=a4*10+a2; /* 数位重组 */cd=a1*10+a3;if(isprime(ab)&&isprime(cd)&&a4!=0&&a1!=0) /* 判断条件 */b[cnt++]=a[i];}for(i=0;i<cnt-1;i++) /* 选择法排序 */for(j=i+1;j<cnt;j++)if(b[i]<b[j]){ temp=b[i];b[i]=b[j];b[j]=temp;}}第31套已知数据文件IN1.DA T和IN2.DA T中分别存有100个两位十进制数,并已调用读函数READDAT()把这两个文件中的数存入数组a和b中，.请编制一函数SV ALUE(),其功能是:依次对数组a和b中的数按条件重新组成一个新数并依次存入数组c中，再对数组c中的数按从小到大的顺序进行排序，最后调用输出函数writeDat（）把结果c输出到文件OUT.DAT 中。

组成新数的条件：如果数组a和b中相同下标位置的数均是奇数，则数组a中十位数字为新数的千位数字，个位数字仍为新的个位数字，数组b中的十位数字为新的百位数字，个位数字为新的十位数字，这样组成的新数依次存入数组c中。

例如：a：12 31 24 15 21 15B：32 45 17 27 18 15C：3451 1275 1155排序后：c：1155 1275 3451void jsVal(){ int i,j; /* 定义变量 */int a1,a2,b1,b2;int ab;int temp;for(i=0;i<MAX;i++){ a1=a[i]%10; /* 数位分解 */a2=a[i]/10;b1=b[i]%10;b2=b[i]/10;ab=a2*1000+b2*100+b1*10+a1;/* 数位重组 */if(a[i]%2==1&&b[i]%2==1) /* 判断条件 */c[cnt++]=ab;}for(i=0;i<cnt-1;i++) /* 选择法排序 */for(j=i+1;j<cnt;j++)if(c[i]>c[j]){ temp=c[i];c[i]=c[j];c[j]=temp;}}第32套已知数据文件IN.DAT中存有200个四位数, 并已调用读函数readDat()把这些数存入数组a 中,请考生编制一函数jsV al(),其功能是: 把千位数字和十位数字重新组成一个新的十位数ab(新十位数的十位数字是原四位数的千位数字,新十位数的个位数字是原四位数的十位数字), 以及把个位数字和百位数字组成另一个新的十位数cd (新十位数的十位数字是原四位数的个位数字,新十位数的个位数字是原四位数的百位数字), 如果新组成的两个十位数ab<cd, ab必须是奇数且不能被5整除, cd必须是偶数,同时两个新数的十位数字均不为零,则将满足此条件的四位数按从大到小的顺序存入数组b中, 并要计算满足上述条件的四位数的个数cnt。