中易网

关于vb,do loop while的问题``求解

答案:2  悬赏:50  
解决时间 2021-04-27 17:03
  • 提问者网友:年齡太小℡蘿莉
  • 2021-04-27 09:53

Private Sub Command1_Click()
n = Val(InputBox("请输入大于0的偶数N:"))
s = 0
I = 1
C = 1
Do
  s = s + C * I * I
  C =___________
  I =___________
Loop While________
Print "s="; s
Print t
End Sub
下划线该填什么啊```这题简单吗?

最佳答案
  • 二级知识专家网友:一池湖水
  • 2021-04-27 10:55
CPrivate Sub Command1_Click()
n = Val(InputBox("请输入大于0的偶数N:"))
s = 0
I = 1
C = 1
Do
  s = s + C * I * I
  C =______-C_____
  I =____l+1______
Loop While________
Print "s="; s
Print t
End Sub
最后一空,要看你那个N=几啊,所以就不填最后一个哦
全部回答
  • 1楼网友:不服输的倔强
  • 2021-04-27 12:35

Private Sub Command1_Click() N = Val(InputBox("请输入大于0的偶数N:")) s = 0 I = 1 C = 1 Do   s = s + C * I * I   C = -C   I = I + 1 Loop While I <= N Print "s="; s Print t End Sub

我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息!
大家都在看
推荐信息