当前位置: 首页 > 图文教程 > 网络编程 > ASP > ASP教程:等差数列和等比数列通项公式

ASP
isNull(str), isEmpty(str)和 str = 的区别
使用ADO批量更新记录(源代码)
自己动手,结合javascript和dhtml做一个ubb编辑器
检查Email地址的比较完善的正则表达式函数
从Access数据库恢复BMP图像并显示在WEB页面(microsoft)
ASP环境下邮件列表功能的实现 (四)(推荐)
在ASP应用中如何限制同一表单被多次提交!!!!好东西
了解MSMQ,控制ASP进程 (一)
了解MSMQ,控制ASP进程 (二)
ASP技术在论坛中的运用(一)(吐血推荐!!!!)
ASP技术在论坛中的运用(二)(吐血推荐!!!!)
ASP技术在论坛中的运用(三)(吐血推荐!!!!)
ASP技术在论坛中的运用(四)(吐血推荐!!!!)
ASP技术在论坛中的运用(五)(吐血推荐!!!!)
ASP技术在论坛中的运用(六)(吐血推荐!!!!)
ASP技术在论坛中的运用(七)(吐血推荐!!!!)
ASP技术在论坛中的运用(八)(吐血推荐!!!!)
不用数据源打开数据库(DSNless connection)
大部分的ADO的错误码对应的含义
好东西,翻页程序,大家可以参考

ASP教程:等差数列和等比数列通项公式


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-28   浏览: 158 ::
收藏到网摘: n/a

递归实例:等差数列和等比数列通项公式。

以下为引用的内容:
<%
'==================================================
'函数名:DengCha
'作  用:等差数列公式
'参  数: a1  ------等差数列第1项值
'参  数: d   ------公差
'参  数:n   ------第n项
'返回值:等差数列第n项的值
'==================================================
Function DengCha(a1,d,n)
    If Not(IsNumeric(a1) or IsNumeric(d) or IsNumeric(n) or n<1) Then Exit Function
    If n=1 Then
        DengCha = a1
    Else
        DengCha = DengCha(a1,d,n-1) + d
    End If
End Function

'==================================================
'函数名:DengBi
'作  用:等比数列公式
'参  数: a1  ------等比数列第1项值
'参  数: q   ------公比
'参  数:n   ------第n项
'返回值:等比数列第n项的值
'==================================================
Function DengBi(a1,q,n)
    If Not(IsNumeric(a1) or IsNumeric(q) or IsNumeric(n) or n<1) Then Exit Function
    If n=1 Then
        DengBi = a1
    Else
        DengBi = DengCha(a1,q,n-1) * q
    End If
End Function

'Response.write(DengCha(1,2,4))
'Response.write(DengBi(2,2,4))
%>