以下程序找出50以内所有能构成直角三角形的整数组。请在程序【 】处填上正确内容。 Private Sub Command1_ Click() for a = 1 To 50 for b = a To 50 c = Sqr(a ^2 + b ^2) if【

admin2010-09-11  23

问题 以下程序找出50以内所有能构成直角三角形的整数组。请在程序【  】处填上正确内容。
Private Sub Command1_ Click()
for a = 1 To 50
for b = a To 50
c = Sqr(a ^2 + b ^2)
if【  】then Print a; b; c
Next b
Next a
End Sub

选项

答案c<=50 And c=Int(c)

解析 a、b、c为直角三角形的三条边,由题意知a和b是限制在50以内的整数,为了使a、b的值不重复交替出现,限制b的取值范围为a~50。c的取值必须满足两个条件,即“c<=50”和“c=Int(c)”。
转载请注明原文地址:https://jikaoti.com/ti/qGg0FFFM
0

最新回复(0)