2. 计算机
  3. 在考生目录下有一个工程文件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被视为同一个组合，不应该重复计算)。编写

admin2010-09-02  51
问题 在考生目录下有一个工程文件sjt5．vbp，用来计算勾股定．理整数组合的个数，勾股定理中三个数的关系是：a2+b22=c2，例如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全国计算机二级

相关试题推荐
随机试题
最新回复(0)