首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件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
27
问题
在考生文件夹下有一个工程文件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:分析并编写程序代码。 程序提供代码 窗体代码 Private Sub Command1_Click() ’===考生编写程序开始==== ’===考生编写程序结束==== ’不要改动以下内容 save Label1 End Sub 模块代码 Public Sub save(l As Control) Open App.Path & "\out5.txt" For Output As #1 Print #1, l.Caption Close #1 End Sub 程序结束 参考答案 Private Sub Command1_Click() 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 End If Next k Next j Next i Label1 = m / 2 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://jikaoti.com/ti/BKS0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有下面的程序段:x=InputBox("请输入一个整数")ReDima(x)Fork=xTo0Step-1a(k)=kNextk一般,在这段程
假设窗体上有一个通用对话框控件CD1,希望在执行下面程序时,打开如图所示的文件对话框:PrivateSubCommand1_Click()CD1.DialogTifle="打开文件"CD1.InitDir=
在窗体上有1个名为Cd1的通用对话框,为了在运行程序是时打开保存文件对话框,险则在程序中应使用的语句是
设有以下定义语句:PrivateTypepointxAsIntegeryAsIntegerEndTypeDimaAspoint下面语句中正确的是
下面关于控件数组的叙述中正确的是
从工程管理角度看,软件设计一般分为两步完成,它们是
下面关下VB应用程序的叙述中正确的是
如果把程序的启动对象设置为:SubMain,则SubMain过程
将E—R图转换为关系模式时,实体和联系都可以表示为()。
随机试题
右肺分上、下两叶,左肺分上、中、下三叶。
流传至今的《尔雅注》的作者是()。
云南的甲厂与广西的乙商场于2011年6月订立奶粉买卖合同,约定7月25日由甲厂在广西的火车站交货。7月14日由于南方洪水灾害,交通暂时中断,甲厂未将此情势通知乙商场,乙商场亦未查询。8月1日交通恢复后,甲厂立即装运,8月9日运抵广西的火车站,甲厂押运人通知
我国是世界上生物种类最丰富的国家之一,高等植物和野生动物物种均占世界10%左右。然而,环境污染和生态破坏导致了动植物生存环境的破坏,物种数量急剧减少,有的物种已经灭绝。据统计,近50年约有200种高等植物灭绝,平均每年灭绝4种;野生动物中约有400种处于濒
在美洲某个国家,希望戒烟的人使用一种尼古丁皮肤贴,它可释放小剂量的尼古丁透过皮肤。从下个月开始,人们可以不用医生处方购买这种皮肤贴,尽管非处方购买的皮肤贴并不比使用处方购买的皮肤贴更有效,而且二者价格同样昂贵,但是皮肤贴制造商预计非处方购买的皮肤贴将令近年
VFP中类层次可分两类,分别为【】和【】。
打开考生文件夹下的演示文稿yswg.pptx,按照下列要求完成对此文稿的修饰并保存。使用“模块”主题修饰全文,全部幻灯片切换方案为“旋转”,效果选项为“自顶部”。
Alandfreefromdestruction,pluswealth,naturalresources,andlaborsupplyallthesewereimportant【21】______inhelpin
Readthearticlebelowabouttheroleofexecutiverecruitmentagencies.Choosethebestsentencefromtheoppositepagetofil
Sofar,inflationisroaringinonlyafewsectorsoftheeconomy.Whileplatinumhassoared121percent,soybeanshaverisen11
最新回复
(
0
)