首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件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
2018-03-20
78
问题
在考生文件夹下有一个工程文件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 h m为记录满足条件的个数 End If Next k Next j Next i Labe11=m/2 ’去掉相同的项 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/jMGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下程序计算自然数e的值,要求精确到1015,阅读下列程序。已知e的计算公式为:e=1+1/1!+1/2!+…+1/n!。请在【】和【】处填上正确内容。PrivateSubCommandl_Click()【】n=0:term
运行下列程序:PrivateSubCommand1_Click()x=0DoWhilex<10x=x*x+1y=y+xLoopMsgBoxy
数学式子5+(a+b)×2对应的VisualBasic表达式是_____________。
阅读下面的程序:PrivateSubForm_Click()DimCheckAsBoolean,CounterAsIntegerCheck=TrueCounter=5Do
下面的程序是找出两个正整数a和b,使得a<b、a+b=99、a和b的最大公约数是3的倍数,并统计满足条件数对的个数。OptionExplicitDimaAsInteger,bAsInteger,nAsInteger,cAsI
设树T的深度为4,其中度为1,2,3,4的结点个数分别为4,2,1,1。则T中的叶子结点数为
在结构化方法中,用数据流程图(DFD)作为描述工具的软件开发阶段是()。
数学式子5+(a+b)×2对应的VisualBasic表达式是()。
(1)请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为Forml、标题为”标签”的窗体上画一个名称为Labell的标签,并设置适当属性以满足以下要求:①标签的内容为”计算机等级考试”;②标签可根据显示内容
8.6787E+8写成普通的十进制数是()。
随机试题
在期初在产品与期末在产品的数量基本平衡的情况下,对生产成本进行分配时,应该考虑期初和期末在产品负担的生产成本。()
执行自动筛选的数据清单,必须
朱门沉沉按歌舞。
A.静脉穿刺针B.气管镜C.导尿管D.听诊器E.输液器材属于中度危险物品的是
患者,男性,23岁。大便后滴血4天,排便时有肿块脱出,大便后可自行缩回肛门,无疼痛。提示:查体肛门未见异常,直肠指诊未扪及包块。较为合理的治疗包括
药物不良反应包括()。
会计资料的真实性和完整性,是会计资料最基本的质量要求,是会计工作的生命。()
《中华人民共和国商业银行法》规定了办理储蓄应当遵守的原则有()。
2013年3月,某省会城市人民政府拟出台《关于全面推进民营经济健康发展的若干办法》(以下简称《办法》)的规章。该《办法》规定:“凡上一年度本市前100名纳税民营企业的企业主,其子女参加高中入学考试,总成绩可加20分。”该《办法》在征求社会各界意见的过程中引
A、neverdreamedofbecominganactressB、alwaysdreamedofbecominganactressC、wasnotgoodatspeakingD、alwaysthoughtshec
最新回复
(
0
)