怎么编FUNCTION函数啊 — 编程爱好者社区

您所在位置：社区首页 — QBasic讨论区 — 怎么编FUNCTION函数啊

回帖发新帖刷新版面

主题：怎么编FUNCTION函数啊

小冤家 [专家分：0] 发布于 2005-03-27 15:24:00

题目
利用FUNCTION函数,编写求1到10所有数阶乘之和????知道者,请编写一下!!!!

本帖地址： http://bbs.pfan.cn/post/67620.html

回复列表（共4个回复）

沙发

飞鸟12 [专家分：2830] 发布于 2005-03-27 16:49:00

DECLARE FUNCTION fun! (n!)
PRINT fun(10)

FUNCTION fun (n)
  fac = 1
  FOR i = 1 TO n
    fac = fac * i               ''求阶乘
    sum = sum + fac             ''求阶乘之和
  NEXT i
  fun = sum
END FUNCTION

板凳

staa [专家分：3690] 发布于 2005-03-28 20:29:00

我的这个效率要低一些：

deflng a-z
n=10
s=0
for i=1 to n
s=s+jc(i)
next
print s
end

function jc(x)
y=1
for i=1 to x
y=y*i
next
jc=y
end function

3 楼

JoCoFo [专家分：110] 发布于 2005-03-29 18:13:00

def

4 楼

小冤家 [专家分：0] 发布于 2005-04-08 21:55:00

谢谢

我来回复

您尚未登录，请登录后再回复。点此登录或注册

主题：怎么编FUNCTION函数啊

回复列表（共4个回复）

我来回复

程序员工具箱 new

代码片段

本版新帖

主题：怎么编FUNCTION函数啊

回复列表 （共4个回复）

我来回复

程序员工具箱 new

代码片段

本版新帖

回复列表（共4个回复）