设为首页收藏本站订阅更新

无忧脚本

 找回密码
 加入无忧

QQ登录

只需一步,快速开始

搜索
查看: 2322|回复: 0

[求助] 递归相加

[复制链接]
发表于 2013-3-8 22:55:34 | 显示全部楼层 |阅读模式
本帖最后由 jz1024 于 2013-3-8 22:56 编辑

<%
a = "2,3,6,4,1,0.7,4.5,5.7,0.5"
b=split(a,",")
for i=0 to Ubound(b)
if i=0 then%>
<%=CDbl(b(i))%>
<%elseif i=1 then%>
<%=CDbl(b(i))+b(i-1)%>
<%elseif i=2 then%>
<%=CDbl(b(i))+b(i-1)+b(i-2)%>
<%elseif i=3 then%>
<%=CDbl(b(i))+b(i-1)+b(i-2)+b(i-3)%>
<%elseif i=4 then%>
<%=CDbl(b(i))+b(i-1)+b(i-2)+b(i-3)+b(i-4)%>
<%elseif i=5 then%>
<%=CDbl(b(i))+b(i-1)+b(i-2)+b(i-3)+b(i-4)+b(i-5)%>
<%elseif i=6 then%>
<%=CDbl(b(i))+b(i-1)+b(i-2)+b(i-3)+b(i-4)+b(i-5)+b(i-6)%>
<%elseif i=7 then%>
<%=CDbl(b(i))+b(i-1)+b(i-2)+b(i-3)+b(i-4)+b(i-5)+b(i-6)+b(i-7)%>
<%elseif i=8 then%>
<%=CDbl(b(i))+b(i-1)+b(i-2)+b(i-3)+b(i-4)+b(i-5)+b(i-6)+b(i-7)+b(i-8)%>
<%end if%>
<%next%>

这个简化成一个公式杂写,递归相加

您需要登录后才可以回帖 登录 | 加入无忧

本版积分规则

小黑屋|手机版|Archiver|无忧脚本 ( 苏ICP备05080427号 )|值班电话:027-62300445   鄂公网安备 42011102000433号

GMT+8, 2017-11-18 07:04 , Processed in 0.091314 second(s), 9 queries , Gzip On, Memcache On.

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表