首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生目录下有一个工程文件vbsj5.vbp,用来计算勾股定理整数组合的个数。勾股定理中3个数的关系是:a2+b2=c2。例如,3、4、5就是一个满足条件的整数组合(注意:a,b,c分别为4,3,5与分别为3,4,5被视为同一个组合,不应该重复计算)。编写
在考生目录下有一个工程文件vbsj5.vbp,用来计算勾股定理整数组合的个数。勾股定理中3个数的关系是:a2+b2=c2。例如,3、4、5就是一个满足条件的整数组合(注意:a,b,c分别为4,3,5与分别为3,4,5被视为同一个组合,不应该重复计算)。编写
admin
2019-05-14
30
问题
在考生目录下有一个工程文件vbsj5.vbp,用来计算勾股定理整数组合的个数。勾股定理中3个数的关系是:a
2
+b
2
=c
2
。例如,3、4、5就是一个满足条件的整数组合(注意:a,b,c分别为4,3,5与分别为3,4,5被视为同一个组合,不应该重复计算)。编写程序,统计三个数均在60以内满足上述关系的整数组合的个数,并显示在标签Lbl1中,运行时程序界面如图3-57所示。
注意:不得修改原有程序的控件的属性。在结束程序运行之前,必须至少正确运行一次程序,将统计的结果显示在标签中,否则无成绩。最后把修改后的文件按原文件名存盘。
程序源码:
Public Sub save(1 As Contro1)
Open App.Path & "\out5.txt" For
Output As #1
Print #1, 1.Caption
C1ose #1
End Sub
选项
答案
审题分析 本题可通过一个嵌套的For。循环,来统计满足题目要求的整数组合的个数。其中,外循环变量i的取值范围为1~60,内循环变量i的取值范围为i~60(这样可避免出现重复的组合)。通过表达式:Sqr(i*i+j*j)= Int(Sqr(i*i+j*j))是否成立来判断Sqr(i*i+j*j)的值是否为整数,并通过表达式:Sqr(i*i+j*j)<=60是否成立来判断Sqr(i*i+j*j)的值是否在60以内,当两个条件同时满足时,此时的i、j及Sqr(i*i+j*j)即为满足题目要求的整数组合,记录组合个数的变量n加一。循环结束,将n值显示在标签Label1中。 操作步骤 步骤1:打开考生文件夹下的工程文件vbsj5.vbp,在码编辑窗口的指定位置输入代码: 参考代码: Private Sub Command1_Click() ′===考生编写程序开始==== Dim i As Integer Dim j As Integer Dim n As Integer For i=1 To 59 For j=i To 60 If Sqr(i*i+j*j)=Int(Sqr (i*i+j*j)) And Sqr (i*i+j*j)<=60 Then n=n+1 End If Next Next Lbl1.Caption=n ′===考生编写程序结束==== ′不要改动以下内容 save Label1 End Sub 步骤2:按
键运行程序,单击“计算”按钮。 步骤3:按要求将文件保存至考生文件夹中。 考点链接 多重循环、常用内部函数
解析
转载请注明原文地址:https://jikaoti.com/ti/kSN0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在考生目录下有一个工程文件sjt5.vbp,其窗体上有一个文本框,名称为Textl;还有两个命令按钮,名称分别为C1、C2,标题分别为“计算”、“存盘”,如图3-20所示。并有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素
考生文件夹下有工程文件sjt5.vbp。程序运行时,外观如图3.187所示,单击“显示数据”按钮,则将考生文件夹下in5.dat文件的内容读入到5行40列的二维数组a中,并按5行显示在Textl文本框内;单击“统计"按钮,则计算每行中小于50的数之和,及这
(1)考生文件夹下的工程文件sjt3.vbp中有一个初始内容:为空、且带有垂直滚动条的文本框,其名称为Text1;两个标题分别为“读数据”和“查找”的命令按钮,其名称分别:勾Cmd1、Cmd2。请画一个标题为“查找结果”的标签Label1,再画一个名称为T
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画两个文本框,其名称分别为Text1和Text2,内容分别为“文本框1”和“文本框2”,编写适当的事件过程。程序运行后,如果单击窗体,则Text
在考生文件夹下有文件in5.txt,文件中有几行汉字。请在Forml的窗体上画一个文本框,名称为Text1,能显示多行;再画一个命令按钮,名称为C1,标题为“存盘”。编写适当的事件过程,使得在加载窗体时,把in5.txt文件的内容显示在文本框中,然后在文本
请根据以下各小题的要求设计visualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画一个名称为C1、标题为“改变颜色”的命令按钮,窗体标题为“改变窗体背景色”。编写程序,使得单击命令按钮时,将窗体的背景颜色改为红色(&HFF&
(1)在考生文件夹下有一个工程文件sit3.vbp,相应的窗体文件为sit3.frm,包含了所有控件和部分程序,如图3—90所示。要求如下:①利用属性窗口向列表框添加四个项目:VisualBasic、TurboC、C++、Java。②请编写适当的程
在名称为Form1的窗体上画一个名称为Image1的图像框,并通过属性窗口为其装入考生文件夹中的图标文件CARS.ico;再画一个名称为Timer1的计时器,一个名称为Command1、标题为“开始”的命令按钮,如图所示。要求:通过属性窗口设置适当的属性
随机试题
足阳明经到达的部位有
公文登记的原则是方便文件的运转和()
以下各项关于银行承兑汇票的描述不正确的是()
实施依法治国的核心是()
下列各项中,不属于“佐药”功用范畴的是
某泵站工程,业主与总承包商、监理单位分别签订了施工合同、监理合同。总承包商经业主同意将土方开挖、设备安装与防渗工程分别分包给专业性公司,并签订了分包合同。施工合同中说明:施工工期278天,2004年9月1日开工,工程造价4357万元。合同约定结算方法;
工业企业为建造生产车间而购入的土地使用权在生产车间正式动工建造之前应作为工程物资核算。( )
根据票据法律制度的规定,下列涉外票据的票据行为中,可以适用行为地法律的有()。
某教师因教育方式不当,对学生进行人格侮辱,学生因不堪忍受而自杀。该教师的行为有过失的因素,要承担相应的法律责任。()
若货币供给为内生变量,则意味着该变量的决定因素可以是()。
最新回复
(
0
)