房天下 > 房天下问答 > 业主生活 > 其他
  • 一道vb题

    勾股定理中三个数的关系为a^2+b^2=c^2。编写程序输出30以内所有满足上述关系的整数组合。

    提问者:QQstar

    发布于2011-02-11

共1个回答
  • nuvoland 丨Lv 4
    因为只是要求求出30以内的数字所以计算的也不是很多就没有考虑什么算法问题了,直接用了最简单也是最笨的穷举方法Dim a, b, c As IntegerDim d As DoubleFor a = 1 To 30 For b = a To 30 d = Sqr(a * a + b * b) For c = 1 To 30 If c = d Then Text1.Text = Text1.Text & vbCrLf & "a=" & a & " b=" & b & " c=" & c End If Next NextNext
    +1 2011-02-12 举报
热门人气推荐
免责声明:问答内容均来源于互联网用户,房天下对其内容不负责任,如有版权或其他问题可以联系房天下进行删除。