已知数据文件IN23.DAT中存有200个4位数,并已调用读函数readDat()把这些数存入数组a中。请编制函数
已知数据文件IN23.DAT中存有200个4位数,并已调用读函数readDat()把这些数存入数组a中。请编制函数JsVal(),其功能是:依次从数组a中取出一个4位数,如果4位数连续大于该4位数以前的5个数且该数是奇数,该数必须能被7整除,则统计出满足此条件的数的个数cnt,并把这些4位数按从大到小的顺序存入数组b中,最后调用写函数writeDat()把结果cnt及数组b中符合条件的4位数输出到OUT23.DAT文件中。
注意:部分源程序已给出。
程序中已定义数组:a[200],b[200],已定义变量:cnt。
请勿改动主函数main()、读函数readDat()和写函数writeDat()的内容。
试题程序:
include 〈stdio.h>
define MAX 200
int a[MAX], b[MAX], cnt = 0;
void jsVal()
{
}
void readDat ()
{
int i;
FILE *fp;
fp = fopen("IN23.DAT", "r"
for(i=0; i〈MAX; i++)
fscanf(fp, "%d", &a[i]
fclose (fp);
}
main ( )
{
int i;
readDat ();
jsVal ();
printf ("满足条件的数=%d\n", cnt);
for(i=0; i〈cnt; i++)
printf("%d", b[i] );
printf("\n");
writeDat ();
}
writeDat ()
{
FILE *fp;
int i;
fp = fopen("OUT23.DAT", "w");
fprintf(fp, "%d\n", cnt);
for(i=0; i〈cnt; i++)
fprintf(fp, "%d\n", b[i]);
fclose (fp);
}
void jsVal() { int i, j, flag=0; for(i=5; i〈MAX; i++) /*如果4位数连续大于该数以前的5个数,则置flag为1,否则取下一个数*/ { for(j=i-5; j〈i; j++) { if(a[i]>a[j]) flag=1; else {flag=0; break;} } if(flag==1&&a[i]%2==1&&a[i]%7==0) /*如果flag为1且该数是奇数,该数能被7整除,则将该数存入数组b中,并统计满足条件的数的个数*/ { b[cnt]=a[i]; cnt++; } } for{i=0;i〈cnt-1; i++) /*将数组b中的数按从大到小的顺序排列*/ for(j=i+1; j〈cnt; i++) if(b[i]〈b[j]) { flag=b[i]; b[i]=b[j]; b[j]=flag; } } 解析:根据题意可知,要编制函数的功能有两部分:一是找出满足条件的4位数,二是对找出的数进行从大到小排序。首先利用一个for循环来依次从数组中取得4位数,接着拿当前得到的4位数与该数前面的连续的5个数依次进行比较。如果该数比它前面的5个数都大,则给标志变量flag赋值1,接着对flag进行判断,如果不为1,则该数肯定不符合条件,直接去取下一个数。若flag值为1,再来判断该数是否是奇数,如果恰好该数又能被7整除,则把该数添加到数组b中。这样就可以依次取出符合条件的数。然后利用选择法对数组b中的元素进行从大到小的排序。
1.已知某DNA分子含有1000个碱基对,其中一条链上A:G:T:C=1:2:3:4,该DNA分子 其他 2020-05-14 …
已知△ABC的三个顶点分别为A(2,3),B(-1,-2)C(-3,4),求已知三角形ABC的三个 数学 2020-05-16 …
15分之7÷[3分之2×(8分之5—4分之1)]学校买来科技书240本,比故事书多3分之1,把这两 数学 2020-05-23 …
1:若x^2+y^2-4x+6y+13=0,则(x^2+2x)/(x^2-3y^2)=?2:已知a 数学 2020-06-11 …
已知某DNA分子共含有1000个碱基对,其中一条链上A:G:T:C=l:2:3:4.该DNA分子连 语文 2020-06-26 …
我们平时用的是十进制数,如:3215=3*10的次+2*10的2次方+1*10+5,表示十进制的数 数学 2020-07-04 …
要配制密度为1.1×10ˆ3Kg/mˆ3的盐水,现已配制成的盐水的体积为0.4dmˆ3,质量0.4 物理 2020-07-09 …
要配制密度为1.1×10ˆ3Kg/mˆ3的盐水,现已配制成的盐水的体积为0.4dmˆ3,质量0.4 物理 2020-07-09 …
进制转换(下面有题)请答题1.十六进制数FFF.C相当于十进制数2.二级制小数0.111111转十 数学 2020-07-18 …
几道关于三角函数的题,1.在Rt△ABC中,∠C=90°﹙1﹚已知a=35,c=35根号2,求∠A 数学 2020-07-21 …