求大神帮我做一下VB,用do while loop

题目

求大神帮我做一下VB,用do while loop
计算1/2+2/3+3/4+4/5.+98/99+99/100
计算1/2+1/4+1/6.+1/94+1/96
计算1/2-2/3+3/4-4/5.-98/99+99/100

答案

第一道
include
void main()
{
int x=0,y=2;
doudle sum;
do
{
sum+=x++/y++;
}
while(y