首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生目录下有一个工程文件sjt5.vbp,用来计算勾股定理整数组合的个数,勾股定理中三个数的关系是:a2+b2=c2 ,例如3、4、5就是一个满足条件的整数组合(注意:a、b、c 别为4、3、5与分别为3、4、5被视为同一个组合,不应该重复计算)。编写程
在考生目录下有一个工程文件sjt5.vbp,用来计算勾股定理整数组合的个数,勾股定理中三个数的关系是:a2+b2=c2 ,例如3、4、5就是一个满足条件的整数组合(注意:a、b、c 别为4、3、5与分别为3、4、5被视为同一个组合,不应该重复计算)。编写程
admin
2018-10-29
55
问题
在考生目录下有一个工程文件sjt5.vbp,用来计算勾股定理整数组合的个数,勾股定理中三个数的关系是:a
2
+b
2
=c
2
,例如3、4、5就是一个满足条件的整数组合(注意:a、b、c 别为4、3、5与分别为3、4、5被视为同一个组合,不应该重复计算)。编写程序,统计三个数均在60 以内满足上述关系的整数组合的个数,并显示在标签Label1中。
注意:不得修改原有程序控件的属性,在结束程序运行之前,必须至少正确运行一次程序,将统计的结果显示在标签中,否则无成绩,最后把修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开考生文件中的本题工程文件sjt5.vbp,在代码编辑窗口编写“计算”按钮的单击事件过程。 参考代码: n = 0 For i = 1 To 60 For j = 1 To 60 For k = 1 To 60 x = k * k If (x = i * i + j * j) And j > i Then Print i; j; k n = n + 1 End If Next k Next j Next i Label1.Caption = n 步骤2:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/w3Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下事件过程:PrivateSubForm_Click() Sum=0 Fork=1To3 Ifk
如果一个菜单项的Enabled属性被设置为False,则程序运行时,该菜单项( )。
以下能够触发文本框Change事件的操作是( )。
在利用菜单编辑器设计菜单时,为了把组合键"Alt+X"设置为"退出(X)"菜单项的访问键,可以将该菜单项的标题设置为( )。
设有如下程序:PrivateSubsV(ByValmAsInteger,nAsInteger)m=m*2n=n-5Printm;nEndSubPrivateSubForm_Cli
假定有如下程序:PrivateSubForm_Click()DimNAsInteger,JAsIntegerN=0J=1DoUntilN>2N=N+1
如果一个顶级菜单项的访问键为D,则以下等同于单击该菜单项的操作为
为了通过传值方式来传送过程参数,在函数声明部分应使用的关键字为( )。
设运行程序时弹出的菜单如图所示.关于该菜单,以下叙述中错误的是( )。
能够产生1到50之间(含1和50)随机整数的表达式是( )。
随机试题
在PowerPoint2010中,按_______组合键可以从当前幻灯片开始放映。
建设项目竣工验收中,工程资料验收包括的内容有()。
公路建设项目竣工环境保护验收的范围主要包括()等。
人格是指人的性格、气质、能力等特征的总和,也指个人的道德品质和人的能作为权力、义务的主体的资格。而人格魅力则指一个人在性格、气质、能力、道德品质等方面具有的能吸引人的力量。根据上述定义,以下所述事件没有受人格魅力影响的是()。
因长时间或大音量听耳机而导致听力受损的未成年人明显增多。有人推荐关注该问题的家长使用一种可以“自动关机”的耳机,这种耳机在持续运行合理时间后或者当音量达到一定限度时就会自动关机。其实,即使家长们采纳建议也于事无补,因为那些听耳机的未成年人都是自己采购耳机。
如果石油供应出现波动导致国际油价上涨,在开放市场国家,如美国,油价也会上升,不管这些国家的石油是全部进口还是完全不进口。如果以上关于石油供应波动的论述是正确的,在开放市场国家中,下面哪个政策最有可能减少由于未预料到的国际油价剧烈上涨而对该国经济的长期影响?
A、 B、 C、 D、 D
October25TheInformantPage10HotelGiantHaltsJumeirahProjectDUBAI-France’sla
Whileurbansettlementshaveexistedforthousandsofyears,rapidurbangrowthisveryrecent.Untilmodemtimes,urbansettlem
You’dbetterhavethepipecheckedtoday.Ithaskept______forthreedays.
最新回复
(
0
)