首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件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-06-30
45
问题
在考生文件夹下有一个工程文件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 3 Next i Label1=m/2’去掉相同的项 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
通过循环嵌套实现遍历60以内的整数,通过勾股定理表达式判断是否为勾股数整数组合,并通过变量的累加实现勾股定理整数组合个数的统计。
转载请注明原文地址:https://kaotiyun.com/show/iQHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在考生文件夹下有一个工程文件Sjt4.vbp。程序的功能是:程序运行时,文本框中显示一篇英文短文,单击“查找”按钮时可输入查找内容,如图1所示。若未找到查找内容,查找结束;若找到查找内容,被找到的内容在文本框中以反相显示(即呈选中状态),每找到
对下列二叉树进行前序遍历的结果为
若要把窗体上命令按钮Command1的状态设置为不可用,应该执行的命令是()。
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的代码如下:PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=Val(InputBox("输入
设窗体上有一个名称为Check1的复选框,并有下面程序代码:PrivateSubChecki_MouseDown(ButtonAsInteger,XAsSingle,YAsSingle)Check1.Value=1
下列有语法错误的赋值语句是
在E-R图中,用来表示实体的图形是
在长度为64的有序线性表中进行顺序查找,最坏情况下需要比较的次数为
在数据库系统的组织结构中,下列()映射把用户数据库与概念数据库联系了起来。
深度为7的完全二叉树中共有125个结点,则该完全二叉树中的叶子结点数为
随机试题
配送是()送货,而工厂送货一般是()送货(直接送到用户手中),而且是生产什么送什么,配送是用户需要什么送什么。
某大型汽车销售公司计划2015年年底前在全国增设10个营销分部,拟从现有的销售分公司中选拔一批后备人才,经过业绩考评和主管领导推荐,公司人力资源部已经提出20名候选人。为了切实保证这次人才选拔质量,公司领导要求,对初选出来的候选人进行一次全国的素质测评,测
刘老师家庭负担重,老人要看病,孩子要读书,于是用假名在培训机构上课,挣钱补贴生活。这种行为()。
二十世纪西方掀起了动物权利运动,有学者认为有些动物是具有某些心理特质的生物——需求、记忆和智力等,在这一点上它们与人类相同。因此,这些动物拥有不可剥夺的权利。上述论证的成立,必须基于以下哪一前提?
随着社会老龄化的日益加剧,许多社区空巢老人越来越多,他们生活小事不能自理,需要社会特殊照顾。目前,社会对一些独居老人的关照仍显欠缺。逢年过节,虽然有关部门上门送粮油、衣物、金钱等进行慰问,但对于空巢老人来说,关心还不到位,措施还不得力。在这种情况下,需要成
简述影响支付方式的主要因素。
1983年5月,王某因犯抢劫罪与强奸罪被人民法院依法判处有期徒刑16年,因服刑期间表现不错,1996年5月被假释。1998年10月的一天,王某盗窃一辆汽车(价值8万多元)而未被发现。2002年4月,王某因参与一起重大诈骗犯罪行为而被逮捕,交待了自己在假释考
A.条件(1)充分,但条件(2)不充分.B.条件(2)充分,但条件(1)不充分.C.条件(1)和条件(2)单独都不充分,但条件(1)和条件(2)联合起来充分.D.条件(1)充分,条件(2)也充分.E.条件(1)和条件(2)单独都不充分,条件(1)和
Despitehelpingtorecordevents,photoscoulddamageourmemories.Researchersfoundpeoplewhotakepictureshave【C1】______rem
在下列程序代码中,主程序内调用函数change()时,若参数传递采用传值方式,则主函数输出为(34);若参数传递采用引用方式,则主函数的输出为(35)。
最新回复
(
0
)