已知数据文件IN85.DAT中存有200个4位数,并已调用读函数readDat()把这些数存入数组9中,请编制一函
已知数据文件IN85.DAT中存有200个4位数,并已调用读函数readDat()把这些数存入数组9中,请编制一函数jsVal(),其功能是:如果一个4位数的千位数字上的值加十位数字上的值恰好等于百位数字上的值加上个位数字上的值,并且此4位数是偶数,则统计出满足此条件的数的个数cnt并把这些4位数按从小到大的顺序存入数组b中,最后调用写函数writeDat()把结果cnt及数组b中符合条件的4位数输出到OUT85.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("IN85.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 ("OUT85.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, thou, hun, ten, data, j; for (i=0; i200; i++) { thou=a [i]/1000; /*求四位数的千位数字*/ hun=a [i] %1000/100; /*求四位数的百位数字*/ ten=a [i] %100/10; /*求四位数的十位数字*/ data=a [i] %10; /*求四位数的个位数字*/ if(thou+ten==hun+data && a[i]%2!=1) { /*如果千位数加十位数等于百位数加上个位数,并且此数是偶数*/ b[cnt]=a[i]; /*则将满足条件的数存入数组b中*/ cnt++; /*统计满足条件的数的个数*/ } } for (i=0; icnt-1; i++) /*将数组b中的数按小到大的顺序排列*/ for (j=i+l; jcnt; j++) if(b[i]>b[j]) { data=b [i]; b [i] =b [j]; b [j] =data; } } 解析:本题考查的知识点如下:
(1)运算符“%”及“/”的使用。
(2)选择结构中多个条件的布尔运算。
(3)数据的排序。
在本题中,首先要将一个4位数的千位、百位、十位、个位拆成独立的数字。这里借助特殊运算符号“%”(取余)和“/”(整除),拆分方法略。题中给出的两个条件必须同时满足,所以两条件之间用“与”运算。将符合条件的数先存入数组b中,再对b中的数据进行排序。排序使用“选择排序法”。
关于向量概念的一些疑问已知一个直线方程r=a+bt (a,b已知),另外一个向量PQ与向量r是垂直 数学 2020-05-16 …
r(A*A^T)=r(A^T*A)=r(A)证明方程AX=0与A^TAX=0同解AX=0显然有A^ 数学 2020-06-10 …
如图甲所示,在水平面上固定宽为L=1m、足够长的光滑平行金属导轨,左端接有R=0.5Ω的定值电阻, 物理 2020-06-12 …
请问这个怎么判断是否有最大值或者最小值?S(r)=2πr²+2V/r(r>0)这个S(r)的最值怎 数学 2020-06-15 …
信号与系统中的冲激函数匹配法为什么有的是r(0+)-r(0-)=a,有的是r(0+)-r(0-)= 数学 2020-07-05 …
有人根据F=kq1q2/r^2,推出r→0时(表示r趋向于0)F→∝.你认为正确吗?为什么? 物理 2020-07-10 …
若圆(x-1)2+y2=r2(r>0)与曲线x(y-1)=1没有公共点,则半径r的取值范围是()A 数学 2020-07-21 …
假定名义利率为6%,通货膨胀率为3%,则实际利率为多少?如同样的题目的的解题思路:(1+r)=(1 其他 2020-07-31 …
管理学研究中的Pearson相关系数与回归分析在用调研数据进行回归分析的时候,SSCI的文章一般会 数学 2020-08-02 …
初学者用matlab解二元二次方程组没有解,symsrx;[r,x]=solve('(r*(126 数学 2020-08-03 …