杭州交通信息网少爷不要塞草莓了,嗯啊:vb问题!!!!!!!!!!!!!!!!!!!!
来源：百度文库 编辑：杭州交通信息网 时间：2024/05/02 07:49:32
勾股定理中3个数的关系是:a*a+b*b=c*c.编写程序,输出30以内满足上述关系的整数组合,例如3,4,5就是一个整数组合.
知道的帮个忙!!!! 写的详细点哦! 谢谢
知道的帮个忙!!!! 写的详细点哦! 谢谢
For a = 1 To 30
For b = 1 To 30
For c = 1 To 30
If a * a + b * b = c * c Then
Debug.Print (Str(a) + "," + Str(b) + "," + Str(c))
End If
Next c
Next b
Next a
For a = 1 To 30
For b = 1 To 30
For c = 1 To 30
If a * a + b * b = c * c Then
Debug.Print (Str(a) + "2+" + Str(b) + "2=" + Str(c)+"2")
End If
Next c
Next b
Next a