1、第二十二屆全國青少年信息學(xué)奧林匹克聯(lián)賽初賽普及組Pascal語言試題競賽時(shí)間：2016年10月22日14：30-16：30一、單項(xiàng)選擇題（共20題，每題1.5分，共計(jì)30分）1. 以下不是微軟公司出品的軟件是（ ）A. Powerpoint B. Word C. Excel D. Acrobat Reader2. 如果256種顏色用二進(jìn)制編碼來表示，至少需要（ ）位A. 6 B.7 C.8 D.93.以下不屬于無線通信技術(shù)的是（ ）A. 藍(lán)牙 B. WiFi C. GPRS D. 以太網(wǎng)4. 以下不是CPU生產(chǎn)廠商的是（ ）A. intel B. AMD C. Microsoft D. IBM

2、5. 以下不是存儲(chǔ)設(shè)備的是（ ）A. 光盤 B. 磁盤 C. 固態(tài)硬盤 D. 鼠標(biāo)6. 如果開始時(shí)計(jì)算機(jī)處于小寫輸入狀態(tài)，現(xiàn)在有一只小老鼠反復(fù)按照CapsLock、字母鍵A、字母鍵S和字母鍵D的順序循環(huán)按鍵，即CapLock、A、S、D、CapsLock、A、S、D、，屏幕上輸出的第81個(gè)字符是字母（ ）A. A B. S C. D D.a7. 二進(jìn)制00101100和00010101的和是（ ）A. 00101000 B. 01000001 C. 01000100 D. 001110008. 而二進(jìn)制小數(shù)0.1相等的八進(jìn)制是（ ）A. 0.8 B. 0.4 C. 0.2 D. 0.19. 以

3、下是32位機(jī)器和64位機(jī)器的區(qū)別的是（ ）A. 顯示器不同 B. 硬盤大小不同 C. 尋址空間不同 D. 輸入法不同10. 以下關(guān)于字符串的判定語句中正確的是（ ）A. 字符串是一種特殊的線性表 B. 串的長度必須大于零C. 字符串不可以用數(shù)組來表示 D. 空格字符組成的串就是空串11. 一顆二叉樹如右圖所示，若采用順序存儲(chǔ)結(jié)構(gòu)，即用一維數(shù)組元素存儲(chǔ)該二叉樹中的結(jié)點(diǎn)（根結(jié)點(diǎn)的下標(biāo)為1，若某結(jié)點(diǎn)的下標(biāo)為i，則其左孩子位于下標(biāo)2i處，右孩子位于下標(biāo)（2i+1）處），則圖中所有結(jié)點(diǎn)的最大下標(biāo)為（ ）A. 6 B.10 C.12 D. 1512. 若有如下程序段，其中s、a、b、c均已定義為整型變量，

4、且a、c均已賦值（c大于0）.s := a;for b:=1 to c do s:=s+1;則與上述程序段修改s值的功能等價(jià)的賦值語句是（ ）A. s:=a+b B. s:=a+c; C. s:=s+c; D. s:=b+c;13. 有以下程序：vark,n :longint;begin k:=4; n:=0; while n<k do begin inc(n); for n mod 3 <> 0 then continue; dec(k);end;writeln(k, , ,n);end.程序運(yùn)行后的輸出結(jié)果是（ ）A. 2,2 B. 2,3 C. 3,2 D. 3,314

5、. 給定含有n個(gè)不同的數(shù)的數(shù)組L=<x1,x2,xn>。如果L中存在xi(1<i<n)，使得x1<x2<<xi-1<xi>xi+1>>xn,則L是單峰的，并稱xi是L的“峰頂”。現(xiàn)在已知L是單峰的，請把a(bǔ)-c三行代碼補(bǔ)全到算法中使得算法正確找到L的峰頂。a. Search(k+1,n)b. Search(1,k-1)c. return LkSearch(1,n)1. k := n/22. if Lk > Lk-1 and Lk > Lk+13. then _4. else if Lk > Lk-1 and Lk

6、<Lk+15. then _6. else _正確的填空順序是（ ）A. c,a,b B. c,b,a C. a,b,c D. b,a,c15. 設(shè)簡單無向圖G有16條邊且每個(gè)頂點(diǎn)的度數(shù)都是2，則圖G有（ ）個(gè)頂點(diǎn)A.10 B. 12 C. 8 D. 1616. 有7個(gè)一模一樣的蘋果，放到3個(gè)一樣的盤子中，一共有（ ）種方法。A. 7 B. 8 C.21 D. 3717. 下圖表示一個(gè)果園灌溉系統(tǒng)，有A,B,C,D四個(gè)閥門，每個(gè)閥門可以打開或關(guān)上，所有管道粗細(xì)相同，以下設(shè)置閥門的方法中，可以讓果樹澆上水的是（ ）A. B打開，其它都關(guān)上 B. AB都打開，CD都關(guān)上C. A打開，其它都關(guān)

7、上 D. D打開，其它都關(guān)上18. Lucia和她的朋友以及朋友的朋友都在某社交網(wǎng)站上注冊了帳號，下圖是他們之間的關(guān)系圖，兩個(gè)人之間有邊相連代表這兩個(gè)人是朋友，沒有邊相連代表不是朋友。這個(gè)社交網(wǎng)站的規(guī)則是：如果某人A向他（她）的朋友B分享了某張相片，那么B就可以對該相片進(jìn)行評論；如果B評論了該相片，那么他（她）的所有朋友都可以看見這個(gè)評論以及被評論的相片，但是不能對該相片進(jìn)行評論（除非A也向他（她）分享了該相片）。現(xiàn)在Lucia已經(jīng)上傳了一張相片，但是她不想讓Jacob看見這張相片，那么她可以向以下朋友（ ）分享該相片。A. Dana, Michael, Eve B. Dana, Eve, M

8、onicaC. Michael, Eve, Jacob D. Micheal, Peter, Monica19. 周末小明和爸爸媽媽三個(gè)人一起想動(dòng)手做三道菜。小明負(fù)責(zé)洗菜，爸爸負(fù)責(zé)切菜，媽媽負(fù)責(zé)炒菜。假設(shè)做每道菜的順序都是：先洗菜10分鐘，然后切菜10分鐘，最后炒菜10分鐘。那么做一道菜需要30分鐘。注意：兩道不同的菜的相同步驟不可以同時(shí)進(jìn)行。例如第一道菜和第二道菜不能同時(shí)洗，也不能同時(shí)切。那么做完三道菜的最短時(shí)間需要（ ）分鐘。A. 90 B. 60 C. 50 D.4020. 參加NOI比賽，以下不同帶入考場的是（ ）A. 鋼筆 B. 適量的衣服 C. U盤 D. 鉛筆二、問題求解（每題5

9、分，共計(jì)10分）1. 從一個(gè)4×4的棋盤（不可旋轉(zhuǎn)）中選取不在同一行也不在同一列上的兩個(gè)方格，共有_種方法。2、約定二叉樹的根節(jié)點(diǎn)高度為1，一顆結(jié)點(diǎn)數(shù)為2016的二叉樹最少有_個(gè)葉子結(jié)點(diǎn)；一顆結(jié)點(diǎn)數(shù)為2016的二叉樹最小的高度值是_.三、閱讀程序?qū)懡Y(jié)果（共4題，每題8分，共計(jì)32分）1. vartmp, max, min, sum, count:longint; begin count := 0; read(tmp); if tmp=0 then exit; max:= tmp; min:=tmp; sum:=tmp; inc(count); while tmp <> 0

10、 do begin read(tmp); if tmp <> 0 then begin inc(sum, tmp); inc(count): if tmp > max then max := tmp; if tmp<min then min := tmp; end; end; writeln(max,min,sum div count);end.輸入： 1 2 3 4 5 6 0 7輸出：_2、var i, x, y:longint;begin i:=100; x:=0; y:=0; while i>0 do begin dec(i); x:=i mod 8; i

11、f x=1 then inc(y);end;writeln(y);end.輸出：_3、var a: array1.6 of longint=(1,2,3,4,5,6); pi,pj,t,i:longint;begin pi := 1; pj:=1 6; while pi<pj do begin t := api; api:=apj; apj:=t; inc(pi); dec(pj); end; for i:=1 to 6 do write(ai,); writeln;end.輸出：_4.const max = 100;var i, length1,length2:longint; s1,

12、s2:stringmax;begin s1:= I have a dream; s2:=I Have A Dream; length1 := length(s1); length2:= length(s2); for i:=1 to length1 do if (s1i>=a) and (s1i<=z) then s1i:=chr(ord(s1i)-ord(a)+ord(A);for i:=1 to length2 do if (s2i>=a) and (2i <= z) then s2i:=chr(ord(s2i)-ord(a)+ord(A);if s1 = s2 t

13、hen writeln(=)else if s1>2 then writeln(>)else writeln(<);end.輸出：_四、完善程序（共2題，每題14分，共計(jì)28分）1. （讀入整數(shù)）請完善下面的程序，使得程序能夠讀入兩個(gè)longint范圍內(nèi)的整數(shù)，并將這兩個(gè)整數(shù)分別輸出，每行一個(gè)。（第一、五空2.5分，其余3分）輸入的整數(shù)之間和前后只會(huì)出現(xiàn)空格或者回車。輸入數(shù)據(jù)保證合法。例如：輸入： 123 -789輸出： 123 -789var a,b:longint;function readint:longint;var num:longint ; /存儲(chǔ)讀取到的整數(shù) n

14、egative:longint; /負(fù)數(shù)標(biāo)識(shí) c:char; /存儲(chǔ)當(dāng)前讀取到的字符begin num:=0; negative := 0; read(c); while(c<0) or c>9) and (c<>-) do _j_; if (c=-) then negative :=1 else _k_; read(c); while _l_ do begin _m_; read(c);end;if negative =1 then _n_;exit(num);end;begin a:= reading(); b:=readint(); writeln(a); wri

15、teln(b);end.2. (郊游活動(dòng)) 有n名同學(xué)參加學(xué)校組織的郊游活動(dòng)，已知學(xué)校給這n名同學(xué)的郊游總經(jīng)費(fèi)為A元，與此同時(shí)第i位同學(xué)自己攜帶了Mi元。為了方便郊游，活動(dòng)地點(diǎn)提供B(>=n)輛自行車供人租用，租用第j輛自行車的價(jià)格為Cj元，每位同學(xué)可以使用自己攜帶的錢或者學(xué)校的郊游經(jīng)費(fèi)，為了方便帳務(wù)管理，每位同學(xué)只能為自己租用自行車，且不會(huì)借錢給他人，他們想知道最多有多少位同學(xué)能夠租用到自行車（第四、五空2.5分，其余3分） 本題采用二分法，對于區(qū)間l,r，我們?nèi)ブ虚g點(diǎn)min并判斷租用到自行車的人數(shù)能否達(dá)到mid，判斷的過程是利用貪心算法實(shí)現(xiàn)的。constmaxn = 1000000;

16、typearr = array1.MAXN of longint;varn,B,A,l,r,ans,min,i:longint;M,C:arr;function check(nn:longint):boolean;var count,i,j:longint;begin count:=0; i:=_ j_; j:=1; while i<=n do begin if _k_ then inc(count,Cj-Mi); inc(i); inc(j);end;exit(_l_);end;procedure sort(var a:arr; l:longint; r:longint);var i,j,x,y:longint;begin i:=l; j:=r; x:=a(l+r) div 2; while i<= j do begin while ai < x do inc(i); while aj >x do dec(j); if i<=j then begin y:=ai;ai:=aj;aj:=y; inc(i); dec(j); end; end; if i<r then sor