A-A+
以下程序找出50以内所有能构成直角三角形的整数组。阅读下列程序 并完成程序。 Private
问题详情
以下程序找出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)请帮忙给出正确答案和分析,谢谢!
参考答案
正确答案:c<=50和c=Intc
c<=50和c=Intc 解析:A,B,C为直角三角形的三条边,由题意知A和B是限制在50以内的整数,为了使得A,B的值不重复出现,限制B的取值范围为A~50。C的取值必须满足两个条件,即c<=50和c=Int(c) 。