1、以下程序是找出50以内所有能构成直角三角形的整数组.请完成程序.
Private Sub Command1_Click()
For a=1 To 50
For b=a To 50
c=Sqr(a^2+b^2)
If ____ And c=Int(c) Then Print a;b;c
Next b
Next a
End Sub
答案 c
1、以下程序是找出50以内所有能构成直角三角形的整数组.请完成程序.
Private Sub Command1_Click()
For a=1 To 50
For b=a To 50
c=Sqr(a^2+b^2)
If ____ And c=Int(c) Then Print a;b;c
Next b
Next a
End Sub
答案 c