填空题

一下程序找出50以内所有能构成直角三角形的整数组。阅读下列程序，并完成程序。
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
c＜=50 And c=Int(c)