1、精選優(yōu)質(zhì)文檔-傾情為你奉上第十二屆全國青少年信息學(xué)奧林匹克聯(lián)賽初賽試題 （ 普及組 Pascal 語言 二小時完成 ） 全部試題答案均要求寫在答卷紙上，寫在試卷紙上一律無效 一、 單項選擇題 （共20題，每題1.5分，共計30分。每題有且僅有一個正確答案.）。 1. 在下面各世界頂級的獎項中，為計算機(jī)科學(xué)與技術(shù)領(lǐng)域做出杰出貢獻(xiàn)的科學(xué)家設(shè)立的獎項是（ ）。 A. 沃爾夫獎 B. 諾貝爾獎 C. 菲爾茲獎 D. 圖靈獎 2. 在下列各軟件中，不屬于NOIP競賽（復(fù)賽）推薦使用的語言環(huán)境有（ ）。 A. gcc/g+ B. Turbo Pascal C. RHIDE D. free pascal 3

2、. 以下斷電之后仍能保存數(shù)據(jù)的有（ ）。 A. 寄存器 B. ROM C. RAM D. 高速緩存 4Linux是一種( )。 A. 繪圖軟件 B. 程序設(shè)計語言 C. 操作系統(tǒng) D. 網(wǎng)絡(luò)瀏覽器 5. CPU是( )的簡稱。 A. 硬盤 B. 中央處理器 C. 高級程序語言 D. 核心寄存器 6. 在計算機(jī)中，防火墻的作用是（ ）。 A. 防止火災(zāi)蔓延 B.防止網(wǎng)絡(luò)攻擊 C. 防止計算機(jī)死機(jī) D. 防止使用者誤刪除數(shù)據(jù) 7. 在下列關(guān)于計算機(jī)語言的說法中，不正確的是（ ）。 A. Pascal和C都是編譯執(zhí)行的高級語言 B. 高級語言程序比匯編語言程序更容易從一種計算機(jī)移植到另一種計算機(jī)上

3、C. C+是歷史上的第一個支持面向?qū)ο蟮挠嬎銠C(jī)語言 D. 與匯編語言相比，高級語言程序更容易閱讀 8. 在下列關(guān)于計算機(jī)算法的說法中，不正確的是（ ）。 A. 一個正確的算法至少要有一個輸入 B. 算法的改進(jìn)，在很大程度上推動了計算機(jī)科學(xué)與技術(shù)的進(jìn)步 C. 判斷一個算法的好壞的主要標(biāo)準(zhǔn)是算法的時間復(fù)雜性與空間復(fù)雜性 D. 目前仍然存在許多涉及到國計民生的重大課題，還沒有找到能夠在計算機(jī)上實施的有效算法 9. 在下列各種排序算法中，不是以“比較”作為主要操作的算法是（ ）。 A. 選擇排序 B. 冒泡排序 C. 插入排序 D. 基數(shù)排序 10在編程時（使用任一種高級語言，不一定是Pascal），

4、如果需要從磁盤文件中輸入一個很大的二維數(shù)組（例如1000*1000的double型數(shù)組），按行讀（即外層循環(huán)是關(guān)于行的）與按列讀（即外層循環(huán)是關(guān)于列的）相比，在輸入效率上（ ）。 A. 沒有區(qū)別 B. 按行讀的方式要高一些 C. 按列讀的方式要高一些 D. 取決于數(shù)組的存儲方式。 11在Pascal語言中，表達(dá)式 (21 xor 2)的值是（ ） A. 441 B. 42 C.23 D.24 12在Pascal語言中，判斷a不等于0且b不等于0的正確的條件表達(dá)式是（ ） A. not a=0 or not b=0 B. not(a=0)and(b=0) C. not(a=0 and b=0)

5、D. (a<>0)and (b<>0) 13某個車站呈狹長形，寬度只能容下一臺車，并且只有一個出入口。已知某時刻該車站狀態(tài)為空，從這一時刻開始的出入記錄為：“進(jìn)，出，進(jìn)，進(jìn)，進(jìn)，出，出，進(jìn)，進(jìn)，進(jìn)，出,出”。假設(shè)車輛入站的順序為1，2，3，則車輛出站的順序為（ ）。 A. 1, 2, 3, 4, 5 B. 1, 2, 4, 5, 7 C. 1, 4, 3, 7, 6 D. 1, 4, 3, 7, 2 14高度為n的均衡的二叉樹是指：如果去掉葉結(jié)點及相應(yīng)的樹枝，它應(yīng)該是高度為n-1的滿二叉樹。在這里，樹高等于葉結(jié)點的最大深度，根結(jié)點的深度為0，如果某個均衡的二叉樹共有23

6、81個結(jié)點，則該樹的樹高為（ ）。 A. 10 B. 11 C. 12 D. 13 15. 與十進(jìn)制數(shù)1770 對應(yīng)的八進(jìn)制數(shù)是（ ）。 A. 3350 B. 3351 C. 3352 D. 3540 16將5個數(shù)的序列排序，不論原先的順序如何，最少都可以通過（ ）次比較，完成從小到大的排序。 A. 6 B. 7 C. 8 D. 9 17. 設(shè)A=B=D=true，C=false，以下邏輯運算表達(dá)式值為真的有（ ）。 A. (AB)(CD) B.(ABD)C) C. A(BCD) D.(ABC)D 18. (2010)16 + (32)8的結(jié)果是（ ）。 A. (8234)10 B. (202

7、B)16 C. (20056)8 D. (0)2 19. 設(shè)棧S的初始狀態(tài)為空，元素a, b, c, d, e 依次入棧，以下出棧序列不可能出現(xiàn)的有（ ）。 A. a, b, c, e, d B. b, c, a, e, d C. a, e, c, b, d D. d, c, e, b, a 20. 已知6個結(jié)點的二叉樹的先根遍歷是1 2 3 4 5 6（數(shù)字為結(jié)點的編號，以下同），后根遍歷是3 2 5 6 4 1，則該二叉樹的可能的中根遍歷是（ ） A. 3 2 1 4 6 5 B. 3 2 1 5 4 6 C. 2 1 3 5 4 6 D. 2 3 1 4 6 5 二問題求解（共2題，每題

8、5分，共計10分） 1（尋找假幣） 現(xiàn)有80枚硬幣，其中有一枚是假幣，其重量稍輕，所有真幣的重量都相同，如果使用不帶砝碼的天平稱重，最少需要稱幾次，就可以找出假幣？你還要指出第1次的稱重方法。請寫出你的結(jié)果：_。 2（取石子游戲） 現(xiàn)有5堆石子,石子數(shù)依次為3，5，7，19，50，甲乙兩人輪流從任一堆中任?。看沃荒苋∽砸欢?，不能不?。? 取最后一顆石子的一方獲勝。甲先取，問甲有沒有獲勝策略（即無論乙怎樣取，甲只要不失誤，都能獲勝）？如果有，甲第一步應(yīng)該在哪一堆里取多少？請寫出你的結(jié)果： 三閱讀程序?qū)懡Y(jié)果（共4題，每題8分，共計32分） 1. Program ex301; var u:arra

9、y0.3 of integer; i,a,b,x,y:integer; begin y:=10; for i:=0 to 3 do read(ui); a:=(u0+u1+u2+u3) div 7; b:=u0 div (u1-u2) div u3); x:=(u0+a+2)-u(u3+3) mod 4; if (x>10) then y:=y+(b*100-u3) div (uu0 mod 3*5) else y:=y+20+(b*100-u3) div (uu0 mod 3*5); writeln (x,',',y); end. *注：本例中，給定的輸入數(shù)據(jù)可以避免分

10、母為0或下標(biāo)越界。 輸入：9 3 9 4 輸出：_ 2.Program ex302; const m:array0.4 of integer=(2,3,5,7,13); var i,j:integer; t: longint; begin for i:=0 to 4 do begin t:=1; for j:=1 to mi-1 do t:=t*2; t:=(t*2-1)*t; write (t,' '); end; writeln; end. 輸出: 3.Program ex303; Const NN=7; Type Arr1=array0.30 of char; var s

11、:arr1; k,p:integer; Function fun(s:arr1; a:char;n:integer):integer; var j:integer; begin j:=n; while (a<sj)and(j>0) do dec(j); fun:=j; end; begin for k:=1 to NN do sk:=chr(ord('A')+2*k+1); k:=fun(s,'M',NN); writeln(k); end. 輸出：_ 4.program ex304; var x,x2:longint; procedure digi

12、t(n,m:longint); var n2:integer; begin if(m>0) then begin n2:=n mod 10; write(n2:2); if(m>1) then digit(n div 10,m div 10); n2:=n mod 10; write(n2:2); end; end; begin writeln('Input a number:'); readln(x); x2:=1; while(x2<x) do x2:=x2*10; x2:=x2 div 10; digit(x,x2); writeln; end. 輸入：

13、 輸出: 四完善程序 (前4空，每空2.5分，后6空，每空3分，共28分) 1（全排列）下面程序的功能是利用遞歸方法生成從1到n(n<10)的n個數(shù)的全部可能的排列（不一定按升序輸出）。例如，輸入3，則應(yīng)該輸出（每行輸出5個排列）： 123 132 213 231 321 312 程序： Program ex401;var i,n,k:integer; a:array1.10 of integer; count:longint; 變量count記錄不同排列的個數(shù)，這里用于控制換行procedure perm(k:integer);var j,p,t:integer;begin if th

14、en begin inc(count); for p:=1 to k do write(ap:1); write(' '); if ( ) then writeln; exit; end; for j:=k to n do begin t:=ak; ak:=aj; aj:=t; t:=ak; endend;begin writeln('Entry n:'); read(n); count:=0; for i:=1 to n do ai:=i; end.2. 由鍵盤輸入一個奇數(shù) P (P<100,000,000)，其個位數(shù)字不是5，求一個整數(shù) S，使 P&#

15、215;S = 1111.1 ( 在給定的條件下，解 S 必存在)。要求在屏幕上依次輸出以下結(jié)果: （1）S 的全部數(shù)字。除最后一行外，每行輸出 50 位數(shù)字。 （2） 乘積的數(shù)字位數(shù)。 例1：輸入p=13，由于13*8547=，則應(yīng)輸出 8547， 6 例2：輸入p=147，則輸出結(jié)果應(yīng)為，42，即等式的右端有42個1。 程序： program ex402;var p,a,b,c,t,n:longint;begin while (true) do begin writeln ('Input p, the last digit is 1 or 3 or 7 or 9:'); r

16、eadln(p); if (p mod 2<>0)and(p mod 5<>0) then 如果輸入的數(shù)符合要求，結(jié)束循環(huán) end; a:=0; n:=0; while (a<p) do begin a:=a*10+1; inc(n); end; t:=0; repeat b:=a div p; write(b:1); inc(t); if ( ) then writeln; c:= ; a:= inc(n); until c<=0; dec(n); writeln; writeln('n=', );end.一、單項選擇題：（每題1.5分） 1. D 2. B 3. B 4. C 5. B 6.B 7. C 8. A 9. D 10. D 11. C 12. D 13. C 14. B 15. C 16. B 17. B 18. A 19. C 20. B 二、問題求解：（每題 5分） 1 4次 (1分)， 第一步：分成3組：27，27，26，將前2組放到天平上（4分）。 2有獲勝策略(1分)，第1次在第5堆中取32顆石子(4分)，。 三、閱讀程序?qū)懡Y(jié)果 1.