作业帮 > 综合 > 作业

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

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/21 06:24:14
勾股定理三个数的关系是,a ^ 2 + b ^ 2 = c ^ 2..编写程序,输出30以内满足上述关系的整数组合.
vb编程
Dim a%, b%, c%
For a = 1 To 30
For b = 1 To 30
For c = 1 To 30
If c ^ 2 = a ^ 2 + b ^ 2 And a < b And b < c And a < c Then
Print a; b; c
Print
End If
Next c
Next b
Next a