1、输入任意正整数n，首先判断是否是1或2，是就输出1或2，否就进行下一步
2、循环计算s=s+n(n+1)
3、n=n-1，判断n是否等于0，是则跳出循环，输出计算结果s，否就返回上一步继续循环
Private Sub Command1_Click()
Dim n As Integer
n = InputBox("请输入一个正整数")
Print "fun(N)=1*2+2*3+3*4+...+n*(n+1)结果为："; myfun(n)
End Sub
Private Function myfun(ByVal n As Integer) As Long
Dim m As Long
For i = 1 To n
m = m + i * (i + 1)
Next i
myfun = m
End Function
扩展资料
C语言的运算符主要用于构成表达式，同一个符号在不同的表达式中，其作用并不一致。下面按计算的优先顺序，分别说明不同作用的表达式。需要特别指出，在C语言标准中，并没有结合性的说法。
相同优先级运算符，从左至右依次运算。注意后缀运算优先级高于前缀。因此++i++应解释为++(i++)。
而与或非的运算优先级都不一样，因此a && b || b && c解释为(a && b) || (b && c)
合理使用优先级可以极大简化表达式。
1、输入任意正整数n，首先判断是否是1或2，是就输出1或2，否就进行下一步。
2、循环计算s=s+n(n+1)
3、n=n-1，判断n是否等于shu0，是则跳出循环，输出计算结果s，否就返回上一步继续循环。
定义N＝取值函数
定义S=0
N取值
如果N>1,
则S=S+1/N
N=N-1
返回“如果”语句
否则：输出S
扩展资料：
循环结构有两种基本形态： while型循环和do - while型循环。a. while 型循环：其执行序列为：当条件为真时，反复执行A，一旦条件为假，跳出循环，执行循环紧后的语句。b. do-while型循环：执行序列为：首先执行A，再判断条件，条件为真时，一直循环执行A，一旦条件为假，结束循环，执行循环紧后的下一条语句。
参考资料来源：百度百科-程序流程图
本回答被网友采纳1、输入任意正整数n,首先判断是否是1或2,是就输出1或2,否就进行下一步
2、循环计算s=s+n(n+1)
3、n=n-1，判断n是否等于0，是则跳出循环，输出计算结果s，否就返回上一步继续循环
扩展资料
程序框图的优缺点：
优点：形象直观，各种操作一目了然，不会产生“歧义性”，便于理解，算法出错时容易发现，并可以直接转化 为程序。
缺点：所占篇幅较大，由于允许使用流程线，过于灵活，不受约束，使用者可使流程任意转向，从而造成程序阅读和修改上的困难，不利于结构化程序的设计。
本回答被网友采纳2. 循环计算s=s+n(n+1)
3. n=n-1，判断n是否等于0，是则跳出循环，输出计算结果s，否就返回上一步继续循环本回答被提问者采纳