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

18 查阅

[填空题] 以下程序找出50以内所有能构成直角三角形的整数组。请在程序 【15】 处填上正确内容。

Private Sub Command1_ Click()

for a = 1 To 50

for b = a To 50

c = Sqr(a ^2 + b ^2)

if 【15】 then Print a; b; c

Next b

Next a

End Sub

参考答案:

[15]c<=50 And c=Int(c)

a、b、c为直角三角形的三条边,由题意知a和b是限制在50以内的整数,为了使a、b的值不重复交替出现,限制b的取值范围为a~50。c的取值必须满足两个条件,即“c<=50”和“c=Int(c)”。

计算机考试