主题:关于前面朋友求用递归求A+AA+AA+.....可我这怎么不行呢?MOZ?帮忙看一看
洪荒落寞雪
[专家分:1500] 发布于 2005-09-22 00:50:00
DIM a AS INTEGER, n AS INTEGER, s as integer
INPUT "a="; a
INPUT "n="; n
FOR i = 1 TO n
LET s = 0
IF n > 0 THEN
LET s = s + exp(a)
ELSE
PRINT "error!!!"
END IF
NEXT i
PRINT s
END
错在哪了
回复列表 (共7个回复)
沙发
woshihanjin [专家分:2510] 发布于 2005-09-22 08:49:00
FOR i = 1 TO n
LET s = s * 10 + val(a)
NEXT i
板凳
moz [专家分:37620] 发布于 2005-09-22 09:28:00
exp() 是什么意思?好像是求指数喔
韩进好像也不太对喔
s=s*10+i*a
没用到递归喔
3 楼
洪荒落寞雪 [专家分:1500] 发布于 2005-09-22 13:50:00
哦,对。EXP()是求指数。我搞错了,求N次方,运算符是不是 “^” 啊
管它是不是递归呢
现在还不到那个时候
只要能运行我就很开心了
要饭的还会嫌饭是热的还是冷的。是好的还是馊的吗?
4 楼
洪荒落寞雪 [专家分:1500] 发布于 2005-09-22 13:54:00
s=s*10+i*a
这一句怎么解????
你也知道我刚学,不要搞的那么深嘛,像HANJIN那个我就不知道什么意思。不过能够在百忙中斜一眼我的帖子就很好,应该加分
重要通知:即日起,凡回我帖者,一律30分!即回即加!多回多加。不回不加!
5 楼
moz [专家分:37620] 发布于 2005-09-22 14:59:00
DIM a AS INTEGER, n AS INTEGER, s as integer
INPUT "a="; a
INPUT "n="; n
FOR i = 1 TO n
LET s = s*10 + i*a
NEXT i
PRINT s
END
6 楼
洪荒落寞雪 [专家分:1500] 发布于 2005-09-22 18:24:00
MOZ对不起啊,它说在一个主题中只能打50分所以不好意思啦
7 楼
moz [专家分:37620] 发布于 2005-09-22 20:21:00
你客气了
谢谢你加的不少分
够我挨几天饿了
我来回复