在考生目录下有一个工程文件sjt5.vbp,用来计算勾股定.理整数组合的个数,勾股定理中三个数的关系是:a2+b22=c2,例如3、4、5就是一个满足条件的整数组合(注意:a、b、c分别为4、3、5与分别为3、4、5被视为同一个组合,不应该重复计算)。编写

admin2010-09-02  33

问题 在考生目录下有一个工程文件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
0

最新回复(0)