回 帖 发 新 帖 刷新版面

主题:还有求1!+2!+......+10!的,请看看.谢谢.

(1)用FOR -NEXT
CLS
m=1
sum=0
FOR n=1 TO 10
m=m*n
sum=sum+m
next n
print sum
END
(2)用DO-LOOP UNTIL
CLS
m=1
n=1
sum=0
DO
m=m*n
n=n+1
sum=sum+m
LOOP UNTIL n>10
PRINT sum
END

回复列表 (共23个回复)

11 楼

请问cls是什么意思??

12 楼

请问cls是什么是意思

13 楼

清屏
清除屏幕的内容

14 楼

这个问题好象有点小儿科了哦~~~

15 楼

DEF fnmul(i)
p=1
for s = 1 to i
p=p*s
next s
fnmul(i)=p
END DEF

input n
for i = 1 to n
sum=sum+fnmul(i)
print sum
END        新手发帖,请多指教[em8]

16 楼

8楼的写错啦

17 楼

不错。不过可以再简单点儿![em1][em2][em3][em4][em5][em6][em7][em8][em9][em10][em11][em12][em13][em14][em16][em17][em18][em19][em20]

18 楼

CLS
M=1
FOR I=1 to 10
M=I*M
S=S+M
NEXT I
PRINT S
END

19 楼

cls
a = 1
for i = 1 to 10
s = s + a
a = a * i
next i
print s
end
嘻嘻,我也会!

20 楼

cls
a = 1
for i = 1 to 10
s = s + a
a = a *i
next i
print s
end

我来回复

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