题目

尼克斯彻定理：任何一个大于等于1的整数的立方等于一串连续奇数之和，如：13=1，23=3+5，33=7+9+11。编写一个VB程序验证该定理，程序运行时，在文本框Text1中输入一个大于等于1的整数，单击“验证”按钮Command1后，在文本框Text2中显示验证结果，运行界面如图所示。 实现上述功能的VB代码如下，其中加框处代码有误，请改正。 Private Sub Command1_Click( )   Dim a，b，n，t，sum As Integer   Dim flag As Boolean，s As String   n=Val（Text1.Text）   For i=1 To n-3 Step 2     sum=0：t=i：a=t：flag=False     Do While sum<n^3 And flag=False         sum=sum+t         b=t                             ‘⑴         If sum=n^3 Then flag=True     Loop     If flag=True Then Exit For   Next i   s=Str（n）+"^"+Str（3）+"="+Str（a）   For  To b Step 2           ‘⑵     s=s+"+"+Str（i）   Next i   Text2.Text=s End Sub 以上程序段运行时，为了实现上述功能，加框处代码应改正为：⑴；⑵。 答案：【1】t=t+2【2】i=a+2

查看本题答案和解析