求助：用VF编写：s=1!+2!+3!+....+n! 当 s 大于 61000时结束累加,求 n 。 - VFP论坛

编程论坛 → 数据库技术 → 『 VFP论坛』 → 求助：用VF编写：s=1!+2!+3!+....+n! 当 s 大于 61000时结束累加,求 n 。

标题：求助：用VF编写：s=1!+2!+3!+....+n! 当 s 大于 61000时结束累加,求 n 。

只看楼主

china_sn

等　级：论坛游民
帖　子：11
专家分：13
注　册：2018-5-31
结帖率：0

楼主

已结贴√ 问题点数：20 回复次数：5

求助：用VF编写：s=1!+2!+3!+....+n! 当 s 大于 61000时结束累加,求 n 。

求助：用VF编写：s=1!+2!+3!+....+n! 当 s 大于 61000时结束累加,求 n 。万分感谢!!

搜索更多相关主题的帖子: 编写　大于　结束　累加　

2018-05-31 20:49

mywisdom88

等　级：版主
威　望：190
帖　子：3125
专家分：8340
注　册：2015-3-25

第 2 楼

得分:10

local s1,n1,t1
s1=0
t1=1
n1=0
do while s1<61000
   n1=n1+1
   t1=t1*n1
   s1=s1+t1
?n1,s1
enddo

2018-05-31 22:18

MR尚

等　级：论坛游民
威　望：1
帖　子：9
专家分：10
注　册：2018-5-31

第 3 楼

得分:10

Clear
s=0
I=1
DO while .t.
    jc=1
    FOR j=1 to I
        jc=jc*j
    ENDFOR
    s=s+jc
    IF s>=61000
        EXIT
    ELSE
        I=I+1
    ENDIF
ENDDO
?I

2018-06-01 08:50

china_sn

等　级：论坛游民
帖　子：11
专家分：13
注　册：2018-5-31

第 4 楼

得分:0

回复 3楼 MR尚

谢谢!!

2018-06-01 19:06

china_sn

等　级：论坛游民
帖　子：11
专家分：13
注　册：2018-5-31

第 5 楼

得分:0

回复 2楼 mywisdom88

谢谢!!

2018-06-01 19:06

MR尚

等　级：论坛游民
威　望：1
帖　子：9
专家分：10
注　册：2018-5-31

第 6 楼

得分:0

回复 4楼 china_sn

没事，客气了

2018-06-01 20:11

参与讨论请移步原网站贴子：https://bbs.bccn.net/thread-487496-1-1.html