在考生目录下有一个工程文件sjt5.vbp,用来计算勾股定理整数组合的个数,勾股定理中三个数的关系是:a<sup>2</sup>+b<sup>2</sup>=c<sup>2</sup>,例如3、4、5就是一个满足条件的整数组合(注意:a、b、c分别为4、3

admin2013-10-18  30

问题 在考生目录下有一个工程文件sjt5.vbp,用来计算勾股定理整数组合的个数,勾股定理中三个数的关系是:a<sup>2</sup>+b<sup>2</sup>=c<sup>2</sup>,例如3、4、5就是一个满足条件的整数组合(注意:a、b、c分别为4、3、5与分别为3、4、5被视为同一个组合,不应该重复计算)。编写程序,统计三个数均在60以内满足上述关系的整数组合的个数,并显示在标签Labell中。
注意:不得修改原有程序控件的属性,在结束程序运行之前,必须至少正确运行一次程序,将统计的结果显示在标签中,否则无成绩,最后把修改后的文件按原文件名存盘。

选项

答案步骤1:打开考生文件中的本题工程文件sjt5.vbp,在代码编辑窗口编写”计算”按钮的单击事件过程。 参考代码: 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 EndIf Next k Next j Next i Labell.Caption=n 步骤2:按要求将文件保存至考生文件夹中。

解析
转载请注明原文地址:https://kaotiyun.com/show/HTQp777K
0

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