勾股定理中3个数字的关系是a的平方加b的平方等于c的平方.编写一程序,输出20以内满足上述条件的整数集合
问题描述：
勾股定理中3个数字的关系是a的平方加b的平方等于c的平方.编写一程序,输出20以内满足上述条件的整数集合
答
Dim i As Long,j As Long,k As LongFor i = 1 To 20For j = i To 20For k = j To 20If i ^ 2 + j ^ 2 = k ^ 2 Then Print i; j; kNext kNext jNext i所有的符合要求的答案是：3,4,5 5,12,13 6,8,10 8,15,17 9,12,15 ...