开发者社区> 问答> 正文

在vb中,递归算法求2!+4!+…+8!的值

在vb中,递归算法求2!+4!+…+8!的值

展开
收起
知与谁同 2018-07-20 09:40:18 1641 0
1 条回答
写回答
取消 提交回答
  • dim s as long,t as long
    sub sum(n)
    if n=2 then
    t=2
    s=2
    else
    sum(n-2)
    t=t*n*(n-1)
    s=s+t
    end if

    sub command1_click()
    n=cint(inputbox("N="))
    sum(n)
    print s
    end sub
    2019-07-17 22:55:36
    赞同 展开评论 打赏
问答分类:
问答标签:
问答地址:
问答排行榜
最热
最新

相关电子书

更多
数据+算法定义新世界 立即下载
袋鼠云基于实时计算的反黄牛算法 立即下载
Alink:基于Apache Flink的算法平台 立即下载