如何解2005-2004+2003-2002+~+3-2+1
问题描述：
如何解2005-2004+2003-2002+~+3-2+1
答
Private Sub Command1_Click()
For i = 1 To 2005
x = x + i * (-1) ^ (i + 1)
Next i
Print x
End Sub