鏁版嵁緇撴瀯絎笁绔犺璁￠鍙婂弬鑰冪瓟妗圼7]_璺ㄨ€冪綉

聽聽聽聽聽聽聽聽 1. 璁劇粨鐐圭粨鏋勪負(data,link)錛岃瘯鐢ㄤ竴涓叏灞€鎸囬拡p鍜屾煇縐嶉摼鎺ョ粨鏋勫疄鐜頒竴涓槦鍒?/span>,鐢誨嚭紺烘剰鍥?/span>,騫剁粰鍑哄叆闃?/span>addq鍜屽嚭闃?/span>deleteq榪囩▼,瑕佹眰瀹冧滑鐨勬椂闂村鏉傛€ч兘鏄?/span>O(l)錛堜笉璁?/span>new鍜?/span>dispose鏃墮棿錛夈€?a target="_blank">涓滃崡澶у 1996 浜?/span> 錛?/span>10鍒嗭級銆?/span>

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

銆€銆€[棰樼洰鍒嗘瀽]鏈瑕佹眰鐢ㄩ摼鎺ョ粨鏋勫疄鐜頒竴涓槦鍒楋紝鎴戜滑鍙敤閾捐〃緇撴瀯鏉ュ疄鐜般€備竴鑸錛岀敱浜庨槦鍒楃殑鍏堣繘鍏堝嚭鎬ц川錛屾墍浠ラ槦鍒楀父璁鵑槦澶存寚閽堝拰闃熷熬鎸囬拡銆備絾棰樼洰涓粎緇欏嚭涓€涓€滃叏灞€鎸囬拡p鈥濓紝涓旇姹傚叆闃熷拰鍑洪槦鎿嶄綔鐨勬椂闂村鏉傛€ф槸O錛?/span>1錛夛紝鍥犳鎴戜滑鐢ㄥ彧璁懼熬鎸囬拡鐨勫驚鐜摼琛ㄦ潵瀹炵幇闃熷垪銆?/span>

銆€銆€

銆€銆€PROC addq(VAR p:linkedlist,x:elemtp);

銆€銆€//p鏄暟鎹煙涓?/span>data銆侀摼鍩熶負link鐨勭敤寰幆閾捐〃琛ㄧず鐨勯槦鍒楃殑灝炬寚閽堬紝鏈畻娉曟槸鍏ラ槦鎿嶄綔銆?/span>

銆€銆€new(s); //鐢寵鏂扮粨鐐廣€傚亣璁炬湁鍐呭瓨絀洪棿錛屽惁鍒欑郴緇熺粰鍑哄嚭閿欎俊鎭€?/span>

銆€銆€s鈫?/span>.data:=x; s鈫?/span>.link:=p鈫?/span>.link;//灝?/span>s緇撶偣鍏ラ槦銆?/span>

銆€銆€p鈫?/span>.link:=s; p:=s; //灝炬寚閽?/span>p縐昏嚦鏂扮殑闃熷熬銆?/span>

銆€銆€ENDP;

銆€銆€

銆€銆€PROC deleq(VAR p:linkedlist,VAR x:elemtp);

銆€銆€// p鏄暟鎹煙涓?/span>data銆侀摼鍩熶負link鐨勭敤寰幆閾捐〃琛ㄧず鐨勯槦鍒楃殑灝炬寚閽堬紝鏈畻娉曞疄鐜伴槦鍒楀厓绱犵殑鍑洪槦錛岃嫢鍑洪槦鎴愬姛錛岃繑鍥炲嚭闃熷厓绱狅紝鍚﹀垯緇欏嚭澶辮觸淇℃伅銆?/span>

銆€銆€IF 錛?/span>p鈫?/span>.link=p錛?/span>THEN[writeln(鈥滅┖闃熷垪鈥?/span>);return(0);]//甯﹀ご緇撶偣鐨勫驚鐜槦鍒椼€?/span>

銆€銆€ELSE[s:=p鈫?/span>.link鈫?/span>.link; //鎵懼埌闃熷ご鍏冪礌銆?/span>

銆€銆€p鈫?/span>.link鈫?/span>.link:=s鈫?/span>.link; //鍒犻槦澶村厓绱犮€?/span>

銆€銆€x:=s鈫?/span>.data; //榪斿洖鍑洪槦鍏冪礌銆?/span>

銆€銆€IF (p=s) THEN p:=p鈫?/span>.link; //闃熷垪涓彧鏈変竴涓粨鐐癸紝鍑洪槦鍚庢垚涓虹┖闃熷垪銆?/span>

銆€銆€dispose(s); //鍥炴敹鍑洪槦鍏冪礌鎵€鍗犲瓨鍌ㄧ┖闂淬€?/span>

銆€銆€]

銆€銆€ENDP;

銆€銆€[綆楁硶璁ㄨ]涓婅堪鍏ラ槦綆楁硶涓紝鍥犻摼琛ㄧ粨鏋勶紝涓€鑸笉蹇呰€冭檻絀洪棿婧㈠嚭闂錛岀畻娉曠畝鍗曘€傚湪鍑洪槦綆楁硶涓紝棣栧厛瑕佸垽鏂槦鍒楁槸鍚︿負絀猴紝鍙﹀錛屽鍑洪槦鍏冪礌錛岃鍒ゆ柇鏄惁鍥犲嚭闃熻€屾垚涓虹┖闃熷垪銆傚惁鍒欙紝鍙兘瀵艱嚧鍥犲垹闄ゅ嚭闃熺粨鐐硅€屽皢灝炬寚閽堝垹鎺夋垚涓衡€滄?zhèn)寕鍙橀噺鈥濄€?/span>