主题：求e的值
QUICKBASIC
[专家分：50] 发布于 2009-07-17 17:06:00
如题，50分
回复列表 （共5个回复）
沙发
1054122 [专家分：750] 发布于 2009-07-17 17:09:00
CLS
INPUT "Save ? ( y or n ) ", a$
IF a$ = "y" OR a$ = "Y" THEN
OPEN "c:\save.dat" FOR OUTPUT AS #1
END IF
DIM m, n, i, e, k AS DOUBLE
LET n# = 1.797693134862315D+308
LET m# = 0
LET e# = 1
FOR i# = 1 TO n#
k# = 1
FOR j# = 1 TO i#
k# = k# * j#
NEXT j#
e# = e# + k#
NEXT i#
IF a$ = "y" OR a$ = "Y" THEN
PRINT #1, "e="; e#
ELSE
PRINT "E="; E#
END IF
END
板凳
FFKK [专家分：1610] 发布于 2009-07-17 20:08:00
32767
3 楼
1054122 [专家分：750] 发布于 2009-07-18 21:24:00
？？？上楼？？
4 楼
天天和和 [专家分：1420] 发布于 2009-07-19 15:13:00
題 目 不 明 確 ！
5 楼
1054122 [专家分：750] 发布于 2009-07-19 15:33:00
e是自然对数的基数
我来回复
您所在位置：