首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件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
72
问题
在考生文件夹下有一个工程文件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全国计算机二级
相关试题推荐
将—个窗体设置为MDI子窗体的方法是______。
在窗本上放置一个命令按钮Command1,并编写下列单击事件的程序:OptionBase1PrivateSubCommand1_Click()DimcAsInteger,dAsIntegerd
以下语句的输出结果是PrintFormat$(32545,"000,000.00")
标准模块存盘后,形成的磁盘文件扩展名是()。
下列关于二叉树的叙述中,正确的是
在结构化方法中,用数据流程图(DFD)作为描述工具的软件开发阶段是()。
表达式Sgn(0.25)的值是
在考生文件夹下有一个工程文件sjt4.vbp,请在窗体上画三个文本框,其名称分别为Textl、Text2和Text3,文本框内容分别设置为”计算机”、”等级考试”和空白。然后画两个单选按钮,其名称分别为Opl和Op2,标题分别为”交换”和”连接”(如图2-
某二叉树有5个度为2的结点,则该二叉树中的叶子结点数是()。
下面的数写成普通十进制数是()。8.6787E+8
随机试题
简述小说《奥利弗·退斯特》节选部分的艺术特征。
用酸水提取中药中的生物碱时,可用
下述说法错误的是
协调性宫缩乏力可从阴道分娩者,其护理计划为:
可以快速输注且有利尿作用的液体是()。
某化工生产基地,在进行防火设计时,根据不同泡沫系统的功能,为不同储罐设置了相应的泡沫灭火系统。其中,()应选用液下喷射泡沫灭火系统。
持有一种权益类证券的市值与其总市值的比例不得超过(),但因包销导致的情形和中国证券监督管理委员会另有规定的除外。
某高铁线路建设公司占用林地3万平方米用于办公楼的建设,另占用经济林地4万平方米用于建设高铁线路,所占耕地适用的定额税率为15元/平方米。该企业应缴纳耕地占用税()万元。
该商场1995年销售额最高的月份是()。该商场1995年10月份比9月份销售额增加了多少?()
It’s10pm.Youmaynotknowwhereyourchildis,butthechipdoes.Thechipwillalsoknowifyourchildhasfallenandne
最新回复
(
0
)