首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生目录下有一个工程文件sjt5.vbp,用来计算勾股定.理整数组合的个数,勾股定理中三个数的关系是:a2+b22=c2,例如3、4、5就是一个满足条件的整数组合(注意:a、b、c分别为4、3、5与分别为3、4、5被视为同一个组合,不应该重复计算)。编写
在考生目录下有一个工程文件sjt5.vbp,用来计算勾股定.理整数组合的个数,勾股定理中三个数的关系是:a2+b22=c2,例如3、4、5就是一个满足条件的整数组合(注意:a、b、c分别为4、3、5与分别为3、4、5被视为同一个组合,不应该重复计算)。编写
admin
2010-09-02
71
问题
在考生目录下有一个工程文件sjt5.vbp,用来计算勾股定.理整数组合的个数,勾股定理中三个数的关系是:a
2
+b2
2
=c
2
,例如3、4、5就是一个满足条件的整数组合(注意:a、b、c分别为4、3、5与分别为3、4、5被视为同一个组合,不应该重复计算)。编写程序,统计三个数均在60以内满足上述关系的整数组合的个数,并显示在标签Labd1中。
注意:不得修改原有程序控件的属性,在结束程序运行之前,必须至少正确运行一次程序,将统计的结果显示在标签中,否则无成绩,最后把修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤l:打开考生文件中的本题工程文件sjt5.vibp,在代码编辑窗口编写“计算”按钮的单击事件过程。 参考代码: 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:按要求将文件保存至考生文件夹中。
解析
本题可以使用一个三重循环来判断满足勾股定理的组合,由外至内依次使用循环变量i、j、k,其变化范围均为l~60。在内循环中。首先判断k*k是否等于i.i+j.j,若等于则证明满足勾股定理;由于满足勾股定理的两个数都是成对出现,为了不重复计算,还需要加上限定比如j>i。当找到满足条件的一对i、j、k的时候,输出这三个数,并且令计数器加l。
转载请注明原文地址:https://kaotiyun.com/show/jFmp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列选项中不属于结构化程序设计方法的是( )。
Java的简单性首先体现在自身系统的精炼上,它的基本解释程序和【】占内存40KB,附加的基本标准类库和支持线程程序占175KB。
下面不属于java.awt.Event包中定义的事件适配器是( )。
给出下面不完整的类代码,则横线处的语句应该为( )。classPerson{Stringname,department;intage;publicPerson(Strings){nam
执行下列程序段之后,变量n的值为( )。publicclassTest{publicstaticvoidmain(String[]args){inty=2;i
包含Swing构件的Applet(小应用程序)应该是______类的子类。
下列基本命令中,属于类文件分解器命令的是
Java中方法的参数传递是______调用,方法不能改变参数值,但可以改变变量值,两个对象之间的参数字段不能相互交换。
在关系运算中,______运算是对两个具有公共属性的关系所进行的运算。
下面程序实现对zip文件file.zip的查询,在横线处填上正确的语句______。packagetest;importjava.io.*;importjava.util.*;impor
随机试题
采用手T钨极氩弧焊焊接铝镁合金时,应采用()。
以下四种排序方法中,要求附加的内存空量最大的是______。
涎石病时沿腮腺导管挤压腺体见下列哪处有脓性分泌物流出
在干燥综合征中,阳性率最高的是
一个国家国际贸易进口大于出口的现象通常被称为()。
“十年离别后,长大一相逢,问姓惊初见,称名忆旧容”,这是一种()。
在天愿作比翼鸟,__________。天长地久有时尽,__________。(白居易《长恨歌》)
地方政府的类型分为哪几种?()
说明性语言的特点之一是(27),(28)就是一种说明性语言,它又是一种(29)程序设计语言。Horn子句是逻辑程序设计语言中的重要概念。设P,Q,R为原子公式,则(30)为Horn子句。
下面描述了一封电子邮件的传输过程:①发送方利用安装在本地客户机上的电子邮件应用程序OutlookExpress起草电子邮件,单击“发送和接收”邮件命令后,通过(1)_____协议将邮件发送到本地邮件服务器中。②本地邮件服务器收到这个邮
最新回复
(
0
)