勾股定理中三个数的关系是a*a+b*b=c*c.编写程序,输出30以内满足上述关系的整数组合.例如3,4,5就是一个满足要求的整数组合

问题描述:

勾股定理中三个数的关系是a*a+b*b=c*c.编写程序,输出30以内满足上述关系的整数组合.例如3,4,5就是一个满足要求的整数组合
Private Sub Command_Click()
End Sub

既然是组合,那就应该考虑到排列不同但相同组合,1楼的有大量的重复,而且,效率很低,如果你要找的是100以内,那就相当慢了,我改进了一下:用2重循环来做Private Sub Command1_Click()Dim Max As Integer,I As Integer,J ...