vb循环语句的题目：计算3－1/2+2/3-3/4+…+ N/（N+1）的结果（N=10）.（3.26345）

vb循环语句的题目：计算3－1/2+2/3-3/4+…+ N/（N+1）的结果（N=10）.（3.26345）
我是这么写的：For n = 1 To 10
m = n / (n + 1)
o = m * (-1) ^ n
k = k + o
Next n
Print "k="; k + 3
但老师说这不够简洁.劳烦诸位给修改啦!
最好能附上原因!
还有另一题百钱买百鸡（公鸡5元、母鸡3元、小鸡1/3元,100元刚好买100只）
For a = 1 To 20
For b = 1 To 33
c = 100 - a - b
If (a + b + c = 100) And (a * 5 + b * 3 + c * 1 / 3 = 100) Then Print "a="; a,"b="; b,"c="; c
Next b
Next a
能不能改成用两个变量的?