2. 计算机
  3. 在考生文件夹下有一个工程文件sj5．vbp，功能是用来计算勾股定理整数组合的个数。勾股定理中3个数的关系是：a2+b2=c2。例如，3、4、5就是一个满足条件的整数组合(注意：a，b，c分别为4，3，5与分别为3，4，5被视为同一个组合，不应该重复计算)。

在考生文件夹下有一个工程文件sj5．vbp，功能是用来计算勾股定理整数组合的个数。勾股定理中3个数的关系是：a2+b2=c2。例如，3、4、5就是一个满足条件的整数组合(注意：a，b，c分别为4，3，5与分别为3，4，5被视为同一个组合，不应该重复计算)。

admin2010-07-13  61
问题 在考生文件夹下有一个工程文件sj5．vbp，功能是用来计算勾股定理整数组合的个数。勾股定理中3个数的关系是：a2+b2=c2。例如，3、4、5就是一个满足条件的整数组合(注意：a，b，c分别为4，3，5与分别为3，4，5被视为同一个组合，不应该重复计算)。编写程序，统计均在60以内的三个数满足上述关系的整数组合的个数，并显示在标签Labell中。
    注意：不得修改原有程序的控件的属性。在结束程序运行之前，必须至少正确运行一次程序，将统计的结果显示在标签中，否则无成绩。最后把修改后的文件按原文件名存盘。
选项
答案本题主要考查嵌套循环、文件编辑以及If判断语句。根据题意，编写如下代码： ===考生编写程序开始==== Dim i As Integer Dim j As Integer Dim k As Integer For i=1 To 60 For i=1 To 60 For k=1 To 60 If i^2=i^2+k^2 Then m=m+1 End If Next k Next i Next i Labell=m／2 ===考生编写程序结束==== 单击[*]按钮运行程序，并按要求保存。
解析
转载请注明原文地址:https://www.kaotiyun.com/show/JGmp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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