永发信息网

VB 递增的牛群

答案:3  悬赏:50  手机版
解决时间 2021-07-16 19:12
递增的牛群:若一头小母牛,从第四年开始每年生一头母牛,按些规律,第n年时有多少头母牛?
用VB
最佳答案

For i = 1 To n Step 4
s = s * 2


全部回答

If n < 4 Then

Sum = 0

Else

Sum = n - 3

End If

Print Sum

Private Sub Command1_Click() Dim M(4) As Long M(0) = 1 M(1) = 0 M(2) = 0 M(3) = 0 M(4) = 0 For i = 1 To Val(Text1.Text) M(4) = M(4) + M(3) M(3) = M(2) M(2) = M(1) M(1) = M(0) M(0) = M(4) Next Text2.Text = M(0) + M(1) + M(2) + M(3) + M(4) End Sub

我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
请问花十几万买个深圳户口值得吗?
QQ三国XS50新武器多少钱 3孔强8没改的 全套3
监理工程师应如何处理以下问题
QQ会员一级升VIP2要多少天
QQ炫舞开双号整点都可以领到奖品吗?
有什么悲歌?
QQ飞车梦堂Edward用卓越跑的城市体育馆背景音
帝国时代2局域网怎么连啊!
谁能怎送我游戏人生
我身高1米53,穿怎样的靴子好看些
女朋友为什么会这样?
怎样才算是“获得10个满意答案”呢?
曾轶可的新专辑有哪些歌?
为什么武林外传周年庆的祝福无礼卷80级领不了
有点小忧伤的时候怎么办?
推荐资讯
跑跑 卡丁车
QQ自由幻想要几级点亮?
联想笔记本黑屏,开机出现6个小屏幕。
什麽种类的狗狗适合作宠物玩伴?
93年农历11月24日出生的是什么座?是属金吗?
思路英雄20造币所每小时能产多少金子
张衡制作了地动仪,为人们带来了什么
长期看明火会不会导致视力下降?
“十个男人看五个女人洗澡”打一成语
把下面词语分类写下来。
战国七雄是指那七个国家?
东莞什么时候能开通手机电视业务
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?