2023年-第二十二屆全國青少年信息學(xué)奧林匹克聯(lián)賽初賽普及組Pascal

第二十二屆全國青少年信息學(xué)奧林匹克聯(lián)賽初賽普及組Pascal語言試題競賽時間：2023年10月22日14：30-16：30一、單項選擇題〔共20題，每題1.5分，共計30分〕1.以下不是微軟公司出品的軟件是〔〕A.PowerpointB.WordC.ExcelD.AcrobatReader2.如果256種顏色用二進制編碼來表示，至少需要〔〕位A.6B.7C.8D.93.以下不屬于無線通信技術(shù)的是〔〕A.藍牙B.WiFiC.GPRSD.以太網(wǎng)4.以下不是CPU生產(chǎn)廠商的是〔〕A.intelB.AMDC.MicrosoftD.IBM5.以下不是存儲設(shè)備的是〔〕A.光盤B.磁盤C.固態(tài)硬盤D.鼠標(biāo)6.如果開始時計算機處于小寫輸入狀態(tài)，現(xiàn)在有一只小老鼠反復(fù)按照CapsLock、字母鍵A、字母鍵S和字母鍵D的順序循環(huán)按鍵，即CapLock、A、S、D、CapsLock、A、S、D、……，屏幕上輸出的第81個字符是字母〔〕A.AB.SC.DD.a7.二進制00101100和00010101的和是〔〕A.00101000B.01000001C.01000100D.001110008.而二進制小數(shù)0.1相等的八進制是〔〕A.0.8B.0.4C.0.2D.0.19.以下是32位機器和64位機器的區(qū)別的是〔〕A.顯示器不同B.硬盤大小不同C.尋址空間不同D.輸入法不同10.以下關(guān)于字符串的判定語句中正確的是〔〕A.字符串是一種特殊的線性表B.串的長度必須大于零C.字符串不可以用數(shù)組來表示D.空格字符組成的串就是空串11.一顆二叉樹如右圖所示，假設(shè)采用順序存儲結(jié)構(gòu)，即用一維數(shù)組元素存儲該二叉樹中的結(jié)點〔根結(jié)點的下標(biāo)為1，假設(shè)某結(jié)點的下標(biāo)為i，那么其左孩子位于下標(biāo)2i處，右孩子位于下標(biāo)〔2i+1〕處〕，那么圖中所有結(jié)點的最大下標(biāo)為〔〕A.6B.10C.12D.1512.假設(shè)有如下程序段，其中s、a、b、c均已定義為整型變量，且a、c均已賦值〔c大于0〕.s:=a;forb:=1tocdos:=s+1;那么與上述程序段修改s值的功能等價的賦值語句是〔〕A.s:=a+bB.s:=a+c;C.s:=s+c;D.s:=b+c;13.有以下程序：vark,n:longint;begink:=4;n:=0;whilen<kdobegininc(n);fornmod3<>0thencontinue;dec(k);end;writeln(k,’,’,n);end.程序運行后的輸出結(jié)果是〔〕A.2,2B.2,3C.3,2D.3,314.給定含有n個不同的數(shù)的數(shù)組L=<x1,x2,…,xn>。如果L中存在xi(1<i<n)，使得x1<x2<…<xi-1<xi>xi+1>…>xn,那么L是單峰的，并稱xi是L的“峰頂〞?，F(xiàn)在L是單峰的，請把a-c三行代碼補全到算法中使得算法正確找到L的峰頂。a.Search(k+1,n)b.Search(1,k-1)c.returnL[k]Search(1,n)1.k:=[n/2]2.ifL[k]>L[k-1]andL[k]>L[k+1]3.then_______4.elseifL[k]>L[k-1]andL[k]<L[k+1]5.then___________6.else_______________正確的填空順序是〔〕A.c,a,bB.c,b,aC.a,b,cD.b,a,c15.設(shè)簡單無向圖G有16條邊且每個頂點的度數(shù)都是2，那么圖G有〔〕個頂點A.10B.12C.8D.1616.有7個一模一樣的蘋果，放到3個一樣的盤子中，一共有〔〕種方法。A.7B.8C.21D.3717.以下圖表示一個果園灌溉系統(tǒng)，有A,B,C,D四個閥門，每個閥門可以翻開或關(guān)上，所有管道粗細(xì)相同，以下設(shè)置閥門的方法中，可以讓果樹澆上水的是〔〕A.B翻開，其它都關(guān)上B.AB都翻開，CD都關(guān)上C.A翻開，其它都關(guān)上D.D翻開，其它都關(guān)上18.Lucia和她的朋友以及朋友的朋友都在某社交網(wǎng)站上注冊了帳號，以下圖是他們之間的關(guān)系圖，兩個人之間有邊相連代表這兩個人是朋友，沒有邊相連代表不是朋友。這個社交網(wǎng)站的規(guī)那么是：如果某人A向他〔她〕的朋友B分享了某張相片，那么B就可以對該相片進行評論；如果B評論了該相片，那么他〔她〕的所有朋友都可以看見這個評論以及被評論的相片，但是不能對該相片進行評論〔除非A也向他〔她〕分享了該相片〕?，F(xiàn)在Lucia已經(jīng)上傳了一張相片，但是她不想讓Jacob看見這張相片，那么她可以向以下朋友〔〕分享該相片。A.Dana,Michael,EveB.Dana,Eve,MonicaC.Michael,Eve,JacobD.Micheal,Peter,Monica19.周末小明和爸爸媽媽三個人一起想動手做三道菜。小明負(fù)責(zé)洗菜，爸爸負(fù)責(zé)切菜，媽媽負(fù)責(zé)炒菜。假設(shè)做每道菜的順序都是：先洗菜10分鐘，然后切菜10分鐘，最后炒菜10分鐘。那么做一道菜需要30分鐘。注意：兩道不同的菜的相同步驟不可以同時進行。例如第一道菜和第二道菜不能同時洗，也不能同時切。那么做完三道菜的最短時間需要〔〕分鐘。A.90B.60C.50D.4020.參加NOI比賽，以下不同帶入考場的是〔〕A.鋼筆B.適量的衣服C.U盤D.鉛筆二、問題求解〔每題5分，共計10分〕1.從一個4×4的棋盤〔不可旋轉(zhuǎn)〕中選取不在同一行也不在同一列上的兩個方格，共有________種方法。2、約定二叉樹的根節(jié)點高度為1，一顆結(jié)點數(shù)為2023的二叉樹最少有___________個葉子結(jié)點；一顆結(jié)點數(shù)為2023的二叉樹最小的高度值是__________.三、閱讀程序?qū)懡Y(jié)果〔共4題，每題8分，共計32分〕1.vartmp,max,min,sum,count:longint;begincount:=0;read(tmp);iftmp=0thenexit;max:=tmp;min:=tmp;sum:=tmp;inc(count);whiletmp<>0dobeginread(tmp);iftmp<>0thenbegininc(sum,tmp);inc(count):iftmp>maxthenmax:=tmp;iftmp<minthenmin:=tmp;end;end;writeln(max,’,’,min,’,’,sumdivcount);end.輸入：12345607輸出：_____________2、vari,x,y:longint;begini:=100;x:=0;y:=0;whilei>0dobegindec(i);x:=imod8;ifx=1theninc(y);end;writeln(y);end.輸出：__________3、vara:array[1..6]oflongint=(1,2,3,4,5,6);pi,pj,t,i:longint;beginpi:=1;pj:=16;whilepi<pjdobegint:=a[pi];a[pi]:=a[pj];a[pj]:=t;inc(pi);dec(pj);end;fori:=1to6dowrite(a[i],’,’);writeln;end.輸出：_______________4.constmax=100;vari,length1,length2:longint;s1,s2:string[max];begins1:=‘Ihaveadream’;s2:=’IHaveADream’;length1:=length(s1);length2:=length(s2);fori:=1tolength1doif(s1[i]>=’a’)and(s1[i]<=’z’)thens1[i]:=chr(ord(s1[i])-ord(‘a(chǎn)’)+ord(‘A’));fori:=1tolength2doif(s2[i]>=’a’)and(2[i]<=‘z’)thens2[i]:=chr(ord(s2[i])-ord(‘a(chǎn)’)+ord(‘A’));ifs1=s2thenwriteln(‘=’)elseifs1>2thenwriteln(‘>’)elsewriteln(‘<’);end.輸出：_________________四、完善程序〔共2題，每題14分，共計28分〕1.〔讀入整數(shù)〕請完善下面的程序，使得程序能夠讀入兩個longint范圍內(nèi)的整數(shù)，并將這兩個整數(shù)分別輸出，每行一個?！驳谝?、五空2.5分，其余3分〕輸入的整數(shù)之間和前后只會出現(xiàn)空格或者回車。輸入數(shù)據(jù)保證合法。例如：輸入：123-789輸出：123-789vara,b:longint;functionreadint:longint;varnum:longint;//存儲讀取到的整數(shù)negative:longint;//負(fù)數(shù)標(biāo)識c:char;//存儲當(dāng)前讀取到的字符beginnum:=0;negative:=0;read(c);while((c<’0’)orc>’9’))and(c<>’-‘)do______________;if(c=’-‘)thennegative:=1else_____________;read(c);while__________dobegin________________;read(c);end;ifnegative=1then_____________;exit(num);end;begina:=reading();b:=readint();writeln(a);writeln(b);end.2.(郊游活動)有n名同學(xué)參加學(xué)校組織的郊游活動，學(xué)校給這n名同學(xué)的郊游總經(jīng)費為A元，與此同時第i位同學(xué)自己攜帶了Mi元。為了方便郊游，活動地點提供B(>=n)輛自行車供人租用，租用第j輛自行車的價格為Cj元，每位同學(xué)可以使用自己攜帶的錢或者學(xué)校的郊游經(jīng)費，為了方便帳務(wù)管理，每位同學(xué)只能為自己租用自行車，且不會借錢給他人，他們想知道最多有多少位同學(xué)能夠租用到自行車〔第四、五空2.5分，其余3分〕此題采用二分法，對于區(qū)間[l,r]，我們?nèi)ブ虚g點min并判斷租用到自行車的人數(shù)能否到達mid，判斷的過程是利用貪心算法實現(xiàn)的。constmaxn=1000000;typearr=array[1..MAXN]oflongint;varn,B,A,l,r,ans,min,i:longint;M,C:arr;functioncheck(nn:longint):boolean;varcount,i,j:longint;begincount:=0;i:=____________;j:=1;whilei<=ndobeginif____________theninc(count,C[j]-M[i]);inc(i);inc(j);end;exit(__________);end;proceduresort(vara:arr;l:longint;r:longint);vari,j,x,y:longint;begini:=l;j:=r;x:=a[(l+r)div2];whilei<=jdobeginwhilea[i]<xdoinc(i);whilea[j]>xdodec(j);ifi<=jthenbeginy:=a[i];a[i]:=a[j];a[j]:=y;inc(i);dec(j);end;end;ifi