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

以下是此题的【VB源代码】
Private Sub Form_Click()
    Print " a", " b", " c", "a*a", "b*b", "c*c"
    Print
    For a = 1 To 20
        For b = 1 To 20
            For c = 1 To 20
                If a * a + b * b = c * c Then
                    Print a, b, c, a * a, b * b, c * c
                End If
            Next c
        Next b
    Next a
End Sub

运行此VB源码后结果情况如下图所示:


visual basic 程序设计教程第4版 课后答案 刘炳文 编著

来源:visual basic程序设计教程第四版答案(刘炳文)

本文链接:http://www.wb98.com/vb1/post/vb_7.6.html

本站文章搜索:

<< 上一篇下一篇 >>

搜索

Tags列表

扫我手机登录

赞助商链接