首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件央下有一个工程文件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
2015-10-23
30
问题
在考生文件央下有一个工程文件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+l’m为记录满足条件的个数 End If Next k Next j Next i Labe1.1=m/2’去掉相同的项 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
通过循环嵌套实现遍历60以内的整数,通过勾股定理表达式判断是否为勾股数整数组合,并通过变量的累加实现勾股定理整数组合个数的统计。
转载请注明原文地址:https://kaotiyun.com/show/FPLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
执行下面程序,第一行输出结果是【】,第二行输出结果是【】。OptionExplicitPrivateSubForm_Click()DimAAsIntegerA=2CallSub1(A)EndSubPriva
以下用户自定义函数FunctionFunc(aAsInteger,bAsInteger)AsIntegerStaticmAsInteger,iAsIntegerm=0:i=2i=i+m+im=i+a+bF
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后输写如下程序:PrivateSubCommand1_Click()Dimx,y,zAsIntegerx=5y=7z=0Text1.Text="
程序运行后,利用冒泡法对数组a中的数据按从小到大排序。请在空白处填上适当的内容,将程序补充完整。PtivateSubForm_load()Dima(1T05)AsInteger,n=5a(1)=20:a(2)=25:a(3)=10:
假定在工程文件中有一个标准模块,其中定义了如下记录类型TypeBooksNameAsString*10TelNumAsString*20EndType要求在执行事件过程Command1_Click()时,在顺
首先执行循环体,然后再进行条件判断,决定是否结束循环的循环语句是______。
数据结构中,与所使用的计算机无关的是数据的
检查软件产品是否符合需求定义的过程称为
设在工程中定义了下列类型:TypeStutypeinoAsIntegerstrnameAsString*20strsexAsString*1smarkAsSingleEndType在窗体上正确使用这个类型的是下列哪个操作(
在窗体中放置控件,对该控件的操作错误的是()。
随机试题
IP地址211.81.12.129/28的子网掩码可写为()。
反馈应该()
国际营销调研中的非随机抽样方法主要有()
《医疗机构制剂许可证》的审核及批准部门分别为
LeFortⅢ型骨折是指
X线片上,可形成Codman三角的是
某建设项目建安工程费500万元,设备购置费300万元,工程建设其他费按工程费用的30%计算,基本预备费率为10%。建设前期1年,建设期为2年,各年投资计划额如下:第一年投资40%,第二年投资60%,若年涨价率为5%,则该项目建设期间价差预备费为()
计算机所能识别并执行的全部指令的集合,称为该计算机的()。
Psychologiststakecontrastiveviewsofhowexternalrewards,from(31)praisetocoldcash,affectmotivationandcreativity.B
Severewinterstormshaveworsenedthenation’susualpost-holidaybloodshortage,【C1】________anurgentcalltodayforpeopleto
最新回复
(
0
)