下列程序的作用是求所有小于或等于30的自然数对。该程序不完整,请补充完该程序(程序执行结果见下图)。 注:自然数对是指两个自然数的和与差都是平方数(如8与17)。 Private Sub Command1_Click()

admin2010-03-30  45

问题 下列程序的作用是求所有小于或等于30的自然数对。该程序不完整,请补充完该程序(程序执行结果见下图)。
   注:自然数对是指两个自然数的和与差都是平方数(如8与17)。

   Private Sub Command1_Click()
           Dim n As Long
           Dim m As Long
           Dim s As Single
           Dim d As String
           For n=1 To 30
           For m=1 To【   】
              s =n+ m
           【   】
              If Sqr (s)=Int(Sqr(s))【   】Sqr(D)=Int(Sqr(D))Then
                 Print n:m
             End lf
                  Next m
           Next n
   End Sub

选项

答案n,d=n-m ,And

解析
转载请注明原文地址:https://jikaoti.com/ti/DFq0FFFM
0

最新回复(0)