已知数据文件in38.dat中存有200个4位数,并已调用读函数readDat()把这些数存入数组a中,请编制一函
已知数据文件in38.dat中存有200个4位数,并已调用读函数readDat()把这些数存入数组a中,请编制一函数jsVal(),其功能是:若一个4位数的千位数字上的值小于等于百位数字上的值,百位数字上的值小于等于十位数字上的值,以及十位数字上的值小于等于个位数字上的值,并且此4位数是偶数,则统计出满足此条件的数的个数cnt并把这些4位数按从小到大的顺序存入数组b中,最后调用写函数writeDat()把结果cnt及数组b中符合条件韵4位数输出到out38.dat文件中。
注意:部分源程序已给出。
程序中已定义数组;a[200],b[200],已定义变量:ent。
请勿改动主函数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("in38.dat","r");
for(i=0;i<MAX;i++)
fscanf(fp,"%d",&a[i]);
fclose(fp);
}
void main ( )
{
int i;
readDat ( );
j sVal ( );
printf ( "满足条件的数=%d\n", cnt );
for (i=0; i<cnt; i++)
printf("%d\n",b[i] );
writeDat ( );
}
writeDat ( )
{
FILE *fp;
int i;
fp= fopen ( "out 3 8. dar" , "w" );
fprintf (fp, "%d\n", cnt);
for (i=0; i<cnt; i++)
fprint f (fp, "%d\n" ,b[i] );
fclose (fp);
}
void jsVal() { int i,j; int a1,a2,a3,a4,k; for(i=0;iMAX;i++) { a1=a[i]/1000; /*求四位数的千位数字*/ a2=a[i]%1000/100; /*求四位数的百位数字*/ a3=a[i]%100/10; /*求四位数的十位数字*/ a4=a[i]%10; /*求四位数的个位数字*/ if ((a1=a2) && (a2=a3) && (a3=a4)&& (a(i)%2==0)) /*如果该数的千位数小于等于百位数,百位数小于等于十位数,十位数小于等于个位数, 并且此4位数是偶数*/ { b[cnt]=a[i]; /*则将该数存入数组b中*/ cnt++; /*统计满足条件的数的个数*/ } } for(i=0;icnt-1;i++) /*把数组b中的4位数按从小到大的顺序排列*/ for(j=i+1;icnt;j++) if(b[i]>b[j]) {k=b[i]; b[i]=b[j]; b[j]=k; } } 解析:本题考查的知识点如下:
(1)循环结构的嵌套使用。
(2)运算符“%”及“/”的使用。
(3)选择结构中多个条件的布尔运算。
在本题中,首先要解决的问题是如何将一个4位数的千位、百位、十位、个位拆成独立的数字。这里借助特殊运算符号“%”——取余和“/”——整除。将一个4位数整除1000则可得到其个位上的数字,将其除以1000取余再整除100则可得百位上的数字,除以100取余再整除10则可得十位上的数字,除以10取余则得个位上的数字。千位上的数小于等于百位上的数,百位上的数小于等于十位上的数……这些条件需要同时满足,所以各条件之间要用到“与”运算。最后的排序仍用“选择排序法”。
找所有最大线性无关组的方法?α1=(0,2,1,1)T,α2=(-1,-1,-1,-1)T,α3=( 数学 2020-03-31 …
下列各组词中,加点字的读音全都正确的一组是()A.树獭(tǎ)火钵(bō)忤(wǔ)逆悄(qiāo 语文 2020-05-13 …
问一求根公式,t^2-和t+积就是解一个二元一次方程组,其中一个方程是两根之和,另一个方程是两根之 数学 2020-05-14 …
matlab 求解二元非线性方程组本人初次接触MATLAB,望大虾赐教!r=r0*((tsa-t) 其他 2020-05-16 …
【高一生物】物种的特异性》》》在DNA的分子组成中,下列哪一项具有物种特异性( )(A)A/T(B 其他 2020-05-17 …
花生种皮的紫色(R)对红色(r)是显性,厚壳(T)对薄壳(t)是显性,这两对基因是自由组合的.问在 语文 2020-07-01 …
求向量组a1,a2,a3的秩,并求出一个最大无关组.其中a1=(1,2,1,3)t此方,a2=(4 数学 2020-07-08 …
求向量组α1=(2,1,3,-1)T,α2=(3,-1,2,0)T,α3=(1,3,4,-2)T, 其他 2020-07-21 …
matlab解方程组,式子都列出来了,就是不知道怎么的解不出来symstagnle;[agnle, 数学 2020-07-23 …
simulink中的s函数我用simulink搭建了一个模块,用到了s函数,用来实现以下功能:对于 其他 2020-07-23 …