首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt3.vbp,其功能是: ①单击“读数据”按钮,则把考生文件夹下in3.dat文件中的100个正整数读入数组a中; ②单击“统计”按钮,则找出这100个正整数中的所有完全平方数(一个整数若是另外一个整数的平方,那么它就是完全
在考生文件夹下有一个工程文件sjt3.vbp,其功能是: ①单击“读数据”按钮,则把考生文件夹下in3.dat文件中的100个正整数读入数组a中; ②单击“统计”按钮,则找出这100个正整数中的所有完全平方数(一个整数若是另外一个整数的平方,那么它就是完全
admin
2016-09-18
64
问题
在考生文件夹下有一个工程文件sjt3.vbp,其功能是:
①单击“读数据”按钮,则把考生文件夹下in3.dat文件中的100个正整数读入数组a中;
②单击“统计”按钮,则找出这100个正整数中的所有完全平方数(一个整数若是另外一个整数的平方,那么它就是完全平方数。例如,36=62,所以36就是一个完全平方数),并将这些完全平方数的最大值与个数分别显示在文本框Text1、Text2中。
在给出的窗体文件中有了全部控件(如图6所示),但程序不完整,请将程序中的注释符去掉,把?号改为正确的内容,实现上述功能。
注意:考生不得修改窗体文件已存在的控件和程序,最后将程序原文件名存盘。
选项
答案
步骤1:打开考生文件夹下的本题工程文件sjt3.vbp,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: If x=m^2Then:is_square=flag If a(k)>max Then Text1.Text=max:Text2.Text=num 步骤2:按要求将文件保存至考生文件夹中。
解析
Sqr(N)求平方根函数,用于返回N的算术平方根。
is square()函数用于判断参数x是否为完全平方数,方法是从l到x的平方根进行循环,依次判断x是否能等于循环变量的平方,若等于则退出循环,返回True,若循环结束后都没有等于某个循环变量的平方则返回False。
求完全平方数的最大值,只需要先预设最大值为0,然后在循环中每次找到一个完全平方数就将其与最大值比较,若大于预设最大值则令其为新的最大值.同时令计数器加l,循环结束后可得最大值与个数。
转载请注明原文地址:https://kaotiyun.com/show/GpLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列可以启动VisualBasic的方法是()。
在窗体上绘制一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click() c="ABCD" Forn=1To4 Print______ Next
组合框有3种不同的类型,这3种类型是下拉式列表框、简单组合框和______。在这3种不同类型的组合框中,只能选择而不能输入数据的是_____。
数据处理的最小单位是
使用驱动器列表框Drivel?目录列表框Dirl?文件列表框Filel时,需要设置控件的同步。以下能够正确设置两个控件同步的命令是
以下关于菜单设计的叙述中错误的是
设x是小于10的非负数。对此陈述,以下正确的VB表达式是
在数据流图的类型中有两种类型,它们是变换型和______________。
表达式Int(8*Sqr(36)*10^(.2)^10+0.5)/10的值是()。
在3种不同类型的组合框中,只能选择而不能输入数据的组合框是______________。
随机试题
审美起源的本能说的重要贡献在于()
贫血时患者表现皮肤、黏膜苍白,较为可靠的检查部位是
下列各项中,不应计入管理费用的是()。
下列存款人中,可以申请开立基本存款账户的有()。
欧洲西部河流发展航运具有许多优越的条件,从自然因素考虑是因为欧洲西部()。
可行性研究要进行一次()需求分析。
下列诗句和作者搭配正确的是()。
使用VC6打开考生文件夹下的源程序文件modi1.cpp,该程序运行时有错误,请改正程序中的错误,使得程序输出:number1=4.8number2=93.6number3=0.9PRODUCT=404.352
为了更好地控制教材编写的内容、质量和流程,小李负责起草了图书策划方案(请参考“图书策划方案.docx”文件)。他需要将图书策划方案Word文档中的内容制作为可以向教材编委会进行展示的PowerPoint演示文稿。现在,请你根据图书策划方案(请参考“图书
Dr.JamesBarrywasthefirstwomaninEnglandtogotomedicalschool.Whenshewasgrowingup,womencouldnotgotomedicals
最新回复
(
0
)