牛生小牛,一头牛出生后一年可以生一头小牛,现在有1头刚出生的牛,问10年后有多少头牛。

要用pascal做,要程序。小牛不会死。

这是个斐波那契数列,程序很简单:
var a:array[1..20] of integer;
i:integer;
begin
a[1]:=1;{第一年只有一头小牛}
a[2]:=1;{第二年那一头小牛成熟}
for i:=3 to 10 do a[i]:=a[i-1]+a[i-2];
writeln(a[10]);
end.
温馨提示:答案为网友推荐,仅供参考
第1个回答  2012-05-11
rtdrtyr
第2个回答  2012-05-16
var
n,i:longint;
begin
n:=1;
for i:=1 to 10 do begin
n:=n*2;
end;
writeln(n);
end.

答案:1024追问

错的

追答

答案是多少?

追问

答案是55只

第3个回答  2012-05-11
9+8+7+6+5+4+3+2+1=45追问

要用pascal做,要程序

相似回答