求PAS程序：蜜蜂路线（bee.pas,bee.in,bee.out,时限1秒）

program work1

const maxn=10000

type sz=array[1..maxn] of byte

var a,b,c:sz

i,j,m,n,lena,lenb,l:integer

procedure add(var a,b,c:sz)

var i:integer

begin

if lena>lenb then l:=lena else l:=lenb

for i:=1 to l do c[i]:=a[i]+b[i]

for i:=1 to l do

if c[i]>=10 then

begin

c[i]:=c[i]-10

c[i+1]:=c[i+1]+1

end

if c[l+1]>0 then l:=l+1

a:=blena:=lenbb:=clenb:=l

end

begin

readln(m,n)

if m>n then exit

else if n-m=1 then writeln(1)

else

begin

a[1]:=1b[1]:=1lena:=1lenb:=1l:=0

for i:=3 to n-m+1 do

add(a,b,c)

for i:=l downto 1 do write(c[i])

end

end.

每一只工蜂的腰部都有一个蜡腺，能分泌出蜡。这种经过嘴巴的咀嚼后变得又软又韧，用它就可以建造蜂房了。

本草纲目-蜜蜂更多>>

「释名」蜡蜂（《纲目》）、 。 

时珍曰∶蜂尾垂锋，故谓之蜂。蜂有礼范，故谓之 。《礼记》云∶范则冠而蝉有 。《化 书》云∶蜂有君臣之礼。是矣。 

「集解」《别录》曰∶蜂子生武都山谷。 

颂曰∶今处处有之，即蜜 炒食之。 

时珍曰∶蜂子，即蜜蜂子未成时白蛹也。《礼记》有雀、 、蜩、范，皆以供食，则自 古食之矣。其蜂有三种∶一种在林木或土穴中作房，为野蜂；一种人家以器收养者，为家蜂 ，并小而微黄，蜜皆浓美；一种在山岩高峻处作房，即石蜜也，其蜂黑色似牛虻。三者皆 群居有王。王大于众蜂，而色青苍。皆一日两衙，应潮上下。凡蜂之雄者尾锐，雌者尾歧， 相交则黄退。嗅花则以须代鼻，采花则以股抱之。按∶王元之《蜂记》云∶蜂王无毒。窠之 始营，必造一台，大如桃李。 

王居台上，生子于中。王之子尽复为王，岁分其族而去。其分也，或铺如扇，或圆如罂， 拥其王而去。王之所在，蜂不敢螫。若失其王，则众溃而死。其酿蜜如脾，谓之蜜脾。凡取 其蜜不可多，多则蜂饥而不蕃。又不可少，少则蜂惰而不作。呜呼！王之无毒，似君德也。 

营巢如台，似建国也。子复为王，似分定也。拥王而行，似卫主也。王所不螫，似遵法也。 

王失则溃，守义节也。取惟得中，似什一而税也。山人贪其利，恐其分而刺其子，不仁甚矣！

蜜蜂（Bee/Honeybee）是一种会飞行的群居昆虫，属膜翅目、蜜蜂科。体长8—20毫米，黄褐色或黑褐色，生有密毛；头与胸几乎一样宽；触角膝状，复眼椭圆形，口器嚼吸式，后足为携粉足；两对膜质翅，前翅大，后翅小，前后翅以翅钩列连锁；腹部近椭圆形，体毛较胸部为少，腹末有螯针。它们被称为资源昆虫。成蜂体长约2公分～4公分。

---