首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生目录下有一个工程文件sjt5.vbp,用来计算勾股定理整数组合的个数,勾股定理中三个数的关系是:a<sup>2</sup>+b<sup>2</sup>=c<sup>2</sup>,例如3、4、5就是一个满足条件的整数组合(注意:a、b、c分别为4、3
在考生目录下有一个工程文件sjt5.vbp,用来计算勾股定理整数组合的个数,勾股定理中三个数的关系是:a<sup>2</sup>+b<sup>2</sup>=c<sup>2</sup>,例如3、4、5就是一个满足条件的整数组合(注意:a、b、c分别为4、3
admin
2013-10-18
54
问题
在考生目录下有一个工程文件sjt5.vbp,用来计算勾股定理整数组合的个数,勾股定理中三个数的关系是:a<sup>2</sup>+b<sup>2</sup>=c<sup>2</sup>,例如3、4、5就是一个满足条件的整数组合(注意:a、b、c分别为4、3、5与分别为3、4、5被视为同一个组合,不应该重复计算)。编写程序,统计三个数均在60以内满足上述关系的整数组合的个数,并显示在标签Labell中。
注意:不得修改原有程序控件的属性,在结束程序运行之前,必须至少正确运行一次程序,将统计的结果显示在标签中,否则无成绩,最后把修改后的文件按原文件名存盘。
选项
答案
步骤1:打开考生文件中的本题工程文件sjt5.vbp,在代码编辑窗口编写”计算”按钮的单击事件过程。 参考代码: n=0 For i=1 To 60 For j=1 To 60 For k=1 To 60 x=k * k If(x=i*i+j*j)And j> i Then Print i; j; k n=n+ 1 EndIf Next k Next j Next i Labell.Caption=n 步骤2:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/HTQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在Form1的窗体上绘制一个列表框,名为Lab1,通过属性窗口向列表框中添加4个项目,分别为lteln1、Item2、Item3和Item4。编写适当的事件过程,使程序运行后,若双击列表框中的某一项,则把该项添加到列表框中。程序的运行情况如下图所示。
在名为Form1的窗体中建立一个弹出式菜单(程序运行时不显示),名为file,含两个菜单项,其名称分别为save、open,标题分别为“保存”、“打开”。编写适当的事件过程,使程序运行后,若用鼠标右键单击窗体,则弹出此菜单(如下图所示)。注意:
在名为Form1的窗体上绘制一个文本框(名称为Text1)和一个水平滚动条(名称为HSl)。在属性窗口中对滚动条设置如下属性:Min500Max2000LargeChange
在名为Form1的窗体上放置一个名为Text1的文本框。程序运行后,用户在文本框中输入的英文字母一律用大写显示(要求焦点在最右端),如下图所示。注意:文件必须存放在考生文件夹中,窗体文件名为execise12.frm,工程文件名为exe
在Form1的窗体上绘制一个命令按钮,名为Cmd1,标题为Display。编写适当的事件过程,使程序运行后,若单击命令按钮,则在窗体上显示ViSBa1Basic;如果单击窗体,则命令按钮消失。程序运行情况如下图所示。注意:在程序中不能使
在名为Form1的窗体上绘制一个名为Lab1的标签,标题为“确认”;再绘制两个命令按钮,名称分别为Cmd1和Cmd2,标题分别为Yes和No,高均为400、宽均为1000,如下图所示。请在属性窗口中设置适当属性满足以下要求;(1)窗体标题
在名为Form1的窗体上绘制一个名为HS1的水平滚动条,其刻度值范围为1~200:绘制一个命令按钮,名为Cmd1,标题为“移动滚动条”。请编写适当的事件过程,使得在运行时,每单击命令按钮一次(假定单击次数少于10次),滚动框向右移动20个刻度。运行时的窗体
在考生文件夹中有一个工程文件execise94.vbp及窗体文件execise94.frm。请在名为Form1窗体上绘制两个框架,其名称分别为Frame1和Frame2,标题分别为“交通工具”和“到达目标”。在Frame1中绘制两个单选按钮,名称分别为O
在名为Form1的窗体上绘制一个框架,名为Frm1,标题为“这是框架”,高度为3000,宽度为5000z在框架中绘制一个文本框,名为Text1,高度为500,宽度为1500,其位置距框架的左边框500,距框架的上边框1500,文本框中的初始内容设置为“这是
随机试题
保荐制度
泻黄散中配伍藿香的意义在于
手工铺砂法测试路面构造深度方法测试步骤如下:①用小铲向圆筒中缓缓注入准备好的量砂至高出量筒成尖顶状,手提圆筒上部,用钢尺轻轻叩打圆筒中部3次,并用刮尺边沿筒口一次刮平。②用钢板尺测量其所构成圆的两个垂直方向的直径,取其平均值。③用扫帚或毛刷子将测点附近的路
中国少数民族人口虽少,但分布的地域十分广阔,约占全国总面积的()。
李大力最近发现,正在读初三的儿子李小力难以保持自我一致性,容易丧失目标,失去信心。依据埃里克森的心理社会性发展理论,李小力个体发展危机没有处理好的阶段是()。
城市好比一个巨大的海绵,劳动力就像城乡之间流动的水,当经济处于上行期,经济扩张会吸纳更多的劳动力;当经济处于下行期,经济衰退又将这些劳动力挤回了农村。正是中国城乡二元结构所引发的海绵效应,在此次金融危机中发挥着就业缓冲器的作用。但这种海绵效应是不可持续的,
科学家观测表明:(1)全球正在变暖,并且南极冰块正在融化;(2)如果没有人类的破坏性活动,那么臭氧空洞就不会扩大。有关专家根据卫星云图和其他资料分析出:(1)如果科学观测两项都准确的话,那么南极冰块没在融化;(2)如果科学观测至少有一项不准确的话,那么全球
BSP方法认为,企业信息系统开发的准备工作有若干项,下列哪一项最重要?
A、Thosewhoseemodelsofthepatternstheyareexpectedtolearn.B、Thosewhofavorhearinginstructionsoverreadingthem.C、T
A、Hemightgethispassport.B、Hemightgetsomemoneyandclothes.C、Hemightmakehimselfarmed.D、Hemightmakeacall.D对话中女
最新回复
(
0
)