首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,功能是用来计算勾股定理整数组合的个数。勾股定理中3个数的关系是:a2+b2=c2。例如,3、4、5就是一个满足条件的整数组合(注意:a,b,c分别为4,3,5与分别为3,4,5被视为同一个组合,不应该重复计算)
在考生文件夹下有一个工程文件sjt5.vbp,功能是用来计算勾股定理整数组合的个数。勾股定理中3个数的关系是:a2+b2=c2。例如,3、4、5就是一个满足条件的整数组合(注意:a,b,c分别为4,3,5与分别为3,4,5被视为同一个组合,不应该重复计算)
admin
2020-07-22
32
问题
在考生文件夹下有一个工程文件sjt5.vbp,功能是用来计算勾股定理整数组合的个数。勾股定理中3个数的关系是:a
2
+b
2
=c
2
。例如,3、4、5就是一个满足条件的整数组合(注意:a,b,c分别为4,3,5与分别为3,4,5被视为同一个组合,不应该重复计算)。编写程序,统计均在60以内的三个数满足上述关系的整数组合的个数,并显示在标签Label1中。
注意:不得修改原有程序的控件属性。在结束程序运行之前,必须至少正确运行一次程序,将统计的结果显示在标签中,否则无成绩。最后把修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,在代码编辑窗口指定位置编写以下代码。 Dim i As Integer Dim j As Integer Dim k As Integer For i=1 To 60 For j=1 To 60 For k=1 To 60 ’判断三个数是否满足勾股定律 If i^2=j^2+k^2 Then m=m+1’m为记录满足条件的个数 End If Next k Next j Next i Label1=m/2’去掉相同的项 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/GNHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设数据集合为D={1,3,5,7,9},D上的关系为R,下列数据结构B=(D,R)中为非线性结构的是
在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1),程序运行后,在文本框中每输入一个字符,都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是()。
在标准模块中用Public关键字定义的变量,其作用域为( )。
设窗体上有2个文本框Text1和Text2,并有下面的事件过程:DimnPrivateSubText1_KeyPress(KeyAsciiAsInteger) If"A"
Fibonacci数列的规律是:前2个数为1,从第3个数开始,每个数是它前2个数之和,即:1,1,2,3,5,8,13,21,34,55,89,…。某人编写了下面的函数,判断大于1的整数x是否是Fibonacci数列中的某个数,若是,则返回True,否则返
在窗体上画一个名称为Text1的文本框,然后画一个名称为HscroUl的滚动条,其Min和Max属性分别为0和1000。程序运行后,如果移动滑块,则在文本框中显示滚动条的当前值。以下能实现上述操作的程序是()。
假定已在窗体上画了多个控件,其中有一个被选中,为J了存属性窗口中设置窗体的属性,预先应执行的操作是()。
产生100以内(不含100)2位随机整数的VisualBasic表达式是()。
为了通过传值方式来传送过程参数,在函数声明部分应使用的关键字为
随机试题
电视剧《四世同堂》的同名小说作者是()
男,23岁,右大腿下端持续性隐痛1个月余。查体:右大腿下端内侧肿胀,压痛。X线摄片见右股骨下端偏内侧有一骨破坏区,呈肥皂泡样膨胀性生长;病灶局限,类圆形,骨皮质变薄。其最佳治疗措施是
胆道蛔虫病的典型临床表现中,下列哪项是错误的
制定生产管理文件和质量管理文件的要求有()
某企业具有相对固定的业务区域,随着经济社会发展和市场环境变化,该企业拟调整业务区域内的市场竞争策略,为此,企业委托咨询公司进行分析研究。(1)企业收入主要源于A业务,B业务和C业务,各类业务收入情况见表2—1。(2)2016年业务区域内A、B、C业务
在原始凭证中,规范的金额书写应是()。
20世纪90年代初传销活动流行时,我国法律对此没有具体规定。当时,执法机关和司法机关对此类案件的处理一般依据《民法通则》第7条。该条规定:“民事活动应当尊重社会公德,不得损害社会公共利益,破坏国家经济计划,扰乱社会经济秩序。”这说明了法律原则所具有的
A、Trytoavoidmakingahastydecision.B、Takeadvantageofthetrainlinks.C、Talkwiththelocalauthorities.D、Conductfield
Themaindifferencebetweencordlessphonesandcellphonesisthatcordlessphonescanonlyoperateinalimitedrange.Althoug
TodayIwouldliketotellyouabouttheeffectsofoldageonhealth.Actuallytodayalotof【C1】______havetakenplaceinthe
最新回复
(
0
)