已知数据文件IN29.DAT中存有200个4位数,并已调用读函数readDat( )把这些数存入数组a中,请编制
已知数据文件IN29.DAT中存有200个4位数,并已调用读函数readDat( )把这些数存入数组a中,请编制一函数jsVal( ),其功能是:把个位数字和千位数字重新组合成一个新的十位数ab(新十位数的十位数字是原4位数的个位数字,新十位数的个位数字是原4位数的千位数字),以及把百位数字和十位数字组成另一个新的十位数cd(新十位数的十位数字是原4位数的百位数字,新十位数的个位数字是原4位数的十位数字),如果新组成的两个数均为偶数且两个十位数中至少有一个数能被9整除,同时两个新十位数字均不为零,则将满足此条件的4位数按从大到小的顺序存入数组b中,并计算满足上述条件的4位数的个数cnt,最后调用写函数writeDat( )把结果cnt及数组b中符合条件的4位数输出到OUT29.DAT文件中。
注意:部分源程序已给出。
程序中已定义数组:a[200],b[200],已定义变量:cnt。
请勿改动主函数main()、读函数readDat()和写函数writeDat()的内容。
#include
#define MAX 200
int a[MAX],b[MAX],cnt=0;
void writeDat();
void jsVal( )
{
int i,j; /*定义循环控制变量*/
int a1,a2,a3,a4; /*定义变量保存4位数的每位数字*/
int temp; /*定义数据交换时的暂存变量*/
int ab,cd; /*存储重新组合成的十位数*/
for(i=0;i<200;i++) /*逐个取每一个4位数*/
{
a4=a[i]/1000; /*求4位数的千位数字*/
a3=a[i]%1000/100; /*求4位数的百位数字*/
a2=a[i]%100/10; /*求4位数的十位数字*/
a1=a[i]%10; /*求4位数的个位数字*/
ab=10*a1+a4; /*把个位数和千位数重新组合成一个新的十位数ab*/
cd=10*a3+a2; /*把百位数和十位数组成另一个新的十位数cd*/
if((ab%9==0||cd%9==0)&&(ab%2!=1)&&(cd%2!=1)&&a1!=0&&a3!=0)
/*如果新组成的两个数均为偶数且两个十位数中至少有一个数能被9整除,同时两个新十位的十位上的数字均不为零*/
{
b[cnt]=a[i]; /*将满足条件的4位数存入数组b中*/
cnt++; /*统计满足条件的数的个数*/
}
}
for(i=0;i
for(j=i+1;j
if(b[i]
{
temp=b[i];
b[i]=b[j];
b[j]=temp;
}
}
void readDat( )
{
int i;
FILE *fp;
fp=fopen("IN29.DAT","r");
for(i=0;i
fscanf(fp,"%d",&a[i]);
fclose(fp);
}
void main()
{
int i;
readDat();
jsVal();
printf("满足条件的数=%d\n",cnt);
for(i=0;i
printf("%d\n",b[i]);
printf("\n");
writeDat();
}
void writeDat()
{
FILE *fp;
int i;
fp=fopen("OUT29.DAT","w");
fprintf(fp,"%d\n",cnt);
for(i=0;i
fprintf(fp, "%d\n",b[i]);
fclose(fp);
}
( )是指以D/A或T/T方式结算的交易中,根据保付申请人的申请,银行在其已承兑的汇票上加注“Per 职业技能鉴定 2020-05-27 …
小宣在探究某个热学问题时,通过测量得到如下表所示的实验数据,请根据表中数据归纳出温度T与温度t的关 物理 2020-06-11 …
如图表示一对豚鼠产生的后代的遗传结果。若控制皮毛颜色的显、隐性基因分别用T、t表示,两亲本分别为T 语文 2020-06-15 …
如图显示纯合体的棕毛豚鼠(雄)与纯合体黑毛豚鼠(雌)相交后产生下一代的遗传结果.请据图分析回答.( 其他 2020-06-26 …
小宣在探究某个热学问题时,通过测量得到如下表所示的实验数据,请根据表中数据归纳出温度T与温度t的关 物理 2020-06-27 …
小宇同学用电加热器给质量一定的蓖麻油液体均匀加热,研究液体升高的温度与加热时间的关系。通过测量得到 物理 2020-07-16 …
下列是特定条件下自由组合定律的几种情况,请据信息回答:(1)在某种鼠中,已知黄色基因Y对灰色基因y 语文 2020-07-20 …
人体免疫:如图为人体免疫机理模式简图,其中Th细胞为T细胞中的一种,具有辅助激活其他T、B细胞的作 语文 2020-07-25 …
金属铂的电阻对温度变化很灵敏,铂丝电阻阻值与温度的关系如表中数据,请根据表中数据归纳出电阻Rt与温度 物理 2020-11-01 …
图为人体免疫机理的模式简图,其中Th细胞为T细胞中的一种,具有辅助激活其他T、B细胞的作用.请据图回 语文 2020-12-24 …