用BASIC语言编写一个程序 计算1+1*2+1*2*3+1*2*3*4+…………………………1*2*3*4*5*6*7*8*9

不可以使用以下的

LET C=1+1*2+1*3……………………

 

必须用到  FOR  TO  STEP     …………等语句

 

Dim s, t, i
s = 1
For i = 1 To 9
    s = s * i
Next

t=s
For i = 9 To 2 Step -1
    t = t / i
    s = s + t
Next
    Print s

你好   我看了一下  楼上的代码都存在致命的错误，在此贴出正确的代码如上。  思想就是先算出最大的一个数，然后以后每次加上这个数除以他的罪大的数的余数即可，答案应该是409113

核心代码

FOR I=1 TO 9

    FOR J=1 TO I

    S=S+1*J

    NEXT J

NEXT I

dim s,t,i

s=1

t=1

for i=2 to 9

 t=t*i

 s=s+t

next

单循环就好了。 楼上的双循环太麻烦。

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息！