用列隊(duì)解決實(shí)際問題

用列隊(duì)解決實(shí)際問題用列隊(duì)解決實(shí)際問題

列隊(duì)?wèi)?yīng)用場景列隊(duì)?wèi)?yīng)用程序1列隊(duì)?wèi)?yīng)用場景2舞伴問題假設(shè)在周末舞會(huì)上，男士們和女士們進(jìn)入舞廳時(shí)，各自排成一隊(duì)。跳舞開始時(shí)，依次從男隊(duì)和女隊(duì)的隊(duì)頭上各出一人配成舞伴。若兩隊(duì)初始人數(shù)不相同，則較長的那一隊(duì)中未配對(duì)者等待下一輪舞曲?，F(xiàn)要求寫一算法模擬上述舞伴配對(duì)問題。列隊(duì)?wèi)?yīng)用場景3分析：

先入隊(duì)的男士或女士亦先出隊(duì)配成舞伴。因此該問題具體有典型的先進(jìn)先出特性，可用隊(duì)列作為算法的數(shù)據(jù)結(jié)構(gòu)。在算法中，假設(shè)男士和女士的記錄存放在一個(gè)數(shù)組中作為輸入，然后依次掃描該數(shù)組的各元素，并根據(jù)性別來決定是進(jìn)入男隊(duì)還是女隊(duì)。當(dāng)這兩個(gè)隊(duì)列構(gòu)造完成之后，依次將兩隊(duì)當(dāng)前的隊(duì)頭元素出隊(duì)來配成舞伴，直至某隊(duì)列變空為止。此時(shí)，若某隊(duì)仍有等待配對(duì)者，算法輸出此隊(duì)列中等待者的人數(shù)及排在隊(duì)頭的等待者的名字，他（或她）將是下一輪舞曲開始時(shí)第一個(gè)可獲得舞伴的人。隊(duì)列應(yīng)用程序4programdancers;vardancer_name:array[1..100]ofstring;//姓名dancer_sex:array[1..100]ofchar;//性別，'F'表示女性，'M'表示男性F_dancer:array[1..100]ofinteger;F_front,F_rear:integer;//女士隊(duì)列M_dancer:array[1..100]ofinteger;M_front,M_rear:integer;//男士隊(duì)列num,i,count:integer;beginF_front:=0;F_rear:=0;M_front:=0;M_rear:=0;write('請(qǐng)輸入?yún)⒓犹璧娜藬?shù)：');readln(num);writeln('依次輸入跳舞者的性別、姓名：');fori:=1tonumdobeginwrite(i,':');readln(dancer_sex[i],dancer_name[i]);//輸入性別，姓名end;隊(duì)列應(yīng)用程序5

fori:=1tonumdo//依次將跳舞者依其性別入隊(duì),只記錄跳舞者數(shù)組的下標(biāo)beginif(dancer_sex[i]='F')thenbegininc(F_rear);F_dancer[F_rear]:=i;//排入女隊(duì)endelsebegininc(M_rear);M_dancer[M_rear]:=i;//排入男隊(duì)end;end;writeln('跳舞舞伴：');while(F_front<>F_rear)and(M_front<>M_rear)dobegin//依次輸出男女舞伴名inc(F_front);//女士出隊(duì)write(dancer_name[F_dancer[F_front]],'');//打印出隊(duì)女士名inc(M_front);//男士出隊(duì)writeln(dancer_name[M_dancer[M_front]]);//打印出隊(duì)男士名end;

隊(duì)列應(yīng)用程序6if(F_front<>F_rear)thenbegin//輸出女士剩余人數(shù)及隊(duì)頭女士的名字

count:=F_rear-F_front;writeln('還有',count,'位女士等待下一舞曲。');writeln(dancer_name[F_dancer[F_front+1]],'將第一個(gè)獲得舞伴');//取女隊(duì)隊(duì)頭

endelsebeginif(M_front<>M_rear)thenbegin//輸出男隊(duì)剩余人數(shù)及隊(duì)頭者名字

count:=M_rear-M_front;writeln('還有',count,'位男士等待下一舞曲。');