鏁版嵁緇撴瀯絎叚绔犲～絀洪鍙婄瓟妗圼15]_璺ㄨ€冪綉

1. 鍒ゆ柇甯﹀ご緇撶偣鐨勫弻鍚戝驚鐜摼琛?/span>L鏄惁瀵圭О鐩哥瓑鐨勭畻娉曞涓嬫墍紺猴紝璇峰湪鍒掔嚎澶勫～涓婃紜殑璇彞

銆€銆€FUNCTION equal(l:pointer) :boolean;

銆€銆€VAR p,q:pointer; result: Boolean;

銆€銆€BEGIN result =true ; p:= l^.link; q:=l^.pre ;

銆€銆€WHILE (p<>q) AND ((1)_______)DO

銆€銆€IF p^.data=q^.data THEN BEGIN (2)___; (3)____; END錛?/span>

銆€銆€ELSE result=false ;

銆€銆€return(result);

銆€銆€END; 銆?a target="_blank">鍗庡崡甯堣寖澶у 2000騫?/span> 浜斻€?/span>1 ( 9鍒?/span>)銆?/span>

銆€銆€銆愬弬鑰冪瓟妗堛€?/span>

(1)聽聽聽聽 result; (2)p:=p^.link; (3) q:=q^.pre 錛堬紙錛掞級錛堬紦錛夐『搴忓彲鍙橈級

2錛庝笅榪版槸涓€涓敱浜屽弶鏍戠殑鍓嶅簭搴忓垪鍜屼腑搴忓簭鍒楁瀯閫犺浜屽弶鏍戠殑綆楁硶錛屽叾涓紝鏁扮粍A[1..n]瀛樻斁鍓嶅簭搴忓垪錛屾暟緇?/span>B[1..n]瀛樻斁涓簭搴忓垪錛?/span>s涓烘牴緇撶偣鎸囬拡錛?/span>i,j涓烘爲s鐨勫墠搴忓簭鍒楀湪A[1..n]涓殑寮€濮嬩綅緗拰緇撴潫浣嶇疆錛?/span>x,y涓烘爲s鐨勪腑搴忓簭鍒楀湪B[1..n]涓殑寮€濮嬩綅緗拰緇撴潫浣嶇疆銆傛墍鐢熸垚鐨勪簩鍙夋爲閲囩敤浜屽弶閾捐〃瀛樺偍緇撴瀯錛屽叾緇撶偣鐨勫艦寮忎負錛?/span>lchild,data,rchild錛夈€傝鍦ㄧ畻娉曠殑絀烘涓～鍏ラ€傚綋璇彞錛屼嬌鍏舵垚涓轟竴涓畬鏁寸殑綆楁硶銆?/span>

銆€銆€PROCEDURE creatBT(i,j,x,y: integer; VAR s: link);

銆€銆€VAR k,L: integer;

銆€銆€BEGIN s:= NIL;

銆€銆€IF(1)__THEN

銆€銆€BEGIN new (s); s^.data:=a[i]; k:=x;

銆€銆€WHILE(2)_______DO k:=k+1;

銆€銆€L:= (3)____;

銆€銆€IF k=x THEN s^.lchild:=NIL; ELSE(4)_______;

銆€銆€IF k=y THEN s^.rchild:=NIL; ELSE(5)_______錛?/span>

銆€銆€END

銆€銆€END; 銆?a target="_blank">瑗垮畨浜ら€氬ぇ瀛?/a> 1996 浜斻€?/span>1 (9鍒?/span>)銆?/span>

銆€銆€銆愬弬鑰冪瓟妗堛€?/span>

銆€銆€(1)(i<=j) AND (x<=y) (2)A[i]<>B[k] (3)k-x

銆€銆€(4)creatBT(i+1,i+L,x,k-1,s^.lchild) (5) creatBT(i+L+1,j,k+1,y,s^.rchild)