额,学的不是VB,
首先用N除以2,除的尽就从2开始循环,除不尽就1开始
sum一直累加到n,步长为2就可以了.自己对照着换成VB的写法吧.
if（条件）
i=1;
else
i=2;
for(i;i
用户输入一个正整数n,若n为奇数,程序计算出数列1+3+5+...+n之和；若n为偶数,程序则计算2+4+...+n之和
1个回答
相关问题
-
编写程序,使用for循环实现如下功能：用户输入一个整数n,若n为奇数,程序计算出数列1 + 3 + 5 + … + n的
-
写 Delphi 程序 输入一个整数n,计算1~n之间的平方和,立方和,偶数和
-
编写程序输入正整数n,计算他的阶乘n!（n＝n×（n－1）×．．．．．．×3×2×1）
-
定义一个函数f(n),当n为奇数时,f(n)=n；当n为偶数时,若n=r个2×p（r为正整数,p为正奇数）,则f（n)=
-
编写一个程序,计算下面n(n属于N*）个数的和
-
对于任意整数n按下列程序计算n----立方------2n------÷n----+1的答案为?
-
VB编写程序,计算并输出下面级数前n项中(n＝50)奇数项的和.1*2*3+2*3*4+3*4*5+……+n*(n+1)
-
若n为正整数,3+5+7+……+（2n+1）=168,则n=?
-
若n一个整数 则偶数为几 奇数为几
-
小明利用计算机设计了一个计算程序，输入和输出的数据如下表，那么当输入数据为n时，输出的数据应是[n/3n−1][n/3n