1樓:真
dim cow as integer
dim y as integer
dim i as integer
dim n as integer
y = inputbox("")
if y < 4 then
cow = 1
print cow
else
n = y - 3
cow = n
do while n > 4
cow = cow + (n - 4)
n = n - 1
loop
print cow + 1
end if
調式結果為
第4年共有2頭,第8年共有7頭,第11年共有19頭,第30年共有304頭
第100年共有4469頭
2樓:匿名使用者
'n年的母牛數
caws=f(n)
function f(n as integer) as integer
select case n
case 1, 2, 3: f = 1
case 4: f = 2
case is > 4: f = f(n - 1) + f(n - 4) '遞迴
case else: f = 0
end select
end function
3樓:漢天空
dim b() as integer
dim s as integer
dim i as integer
redim b(n) as integerb(1) = 1
s = 1
for i = 1 to n
b(i) = s
if i >= 4 then
s = s + b(i - 3)
end if
next i
'n為年數,好像第 30 年不是那個數
's為 n 年後牛的總數
4樓:
function f1(y as integer) as integer
dim da as integer, xiao(4) as integer
dim n as integer
dim temp1 as integer, temp2 as integer
xiao(0) = 1
for n = 1 to y
temp2 = xiao(1)
xiao(1) = xiao(0)
temp1 = xiao(2)
xiao(2) = temp2
temp2 = xiao(3)
xiao(3) = temp1
da = da + temp2
xiao(0) = da
f1 = xiao(0) + xiao(1) + xiao(2) + xiao(3) + da
next
end function
我用的這個笨方法和上面兩個的答案一樣,30年後是8657頭。是為什麼啊
我夢見兩頭公牛,還有一頭母牛。母牛發情了,兩頭公牛爭鬥。是什
這夢很可能意味著 控制慾蠻強的一天哦!今天的你很希望成為一名上司 老師,對下屬有直接的命令乃至掌握生死的大權呢!希望成為一位父親或母親,教育一個小bb的想法也蠻強烈的哦!喜歡你的人,將會在你這種心情下成為發洩的物件呢!慘不忍睹啊!我夢見兩頭公牛,還有一頭母牛。母牛發情了,兩頭公牛爭鬥。是什麼意思啊?...
我夢見一頭母牛,特別凶特別凶的母牛還帶著一頭小牛!夢見這好嗎
不要相信這些封建的想法,哪有夢見什麼好不好的,現在相信的應該是科學。施主牛年夢到牛,好兆頭,今年必定是事事順利,大吉大利啊 女人夢見騎著母牛和一頭小牛打架什麼意思?夢見牛市要遇到情人的,你這個夢是特別的好,對著你特別的幸福。請問夢見母牛和小牛在牛腩裡,是好事嗎?我男 夢見母牛和小牛在牛腩裡的周公解夢...
夢見從坡上趕牛回家,一頭母牛二頭小牛。牛圈很髒,有水塘,用稻
很美的田園生活啊,這個夢就是告訴你要珍惜目前擁有的一切,不代表啥,呵呵 一篇名為 一頭牛的一生 的文章 帶有牛的成語 牛鬼蛇神 對牛彈琴 汗牛充棟 牛鼎烹雞 庖丁解牛 一 牛鬼蛇神 ni gu sh sh n 釋義 原比喻李賀的詩虛幻怪誕。後用來比喻形形色色的壞人。出處 唐 杜牧 李賀詩序 鯨呿鱉擲...