資源簡介

第十一屆全國青少年信息學(xué)奧林匹克聯(lián)賽初賽試題
（普及組 pascal 語言 二小時完成）
●●全部試題答案要求寫在答題紙上，寫在試卷紙上一律無效●●
一.選擇一個正確的答案代碼（A/B/C/D/E），填入括號內(nèi)（每題1.5分，共30分）
1.在字符串“ababacbabcbdecced”中出現(xiàn)次數(shù)最多的字母出現(xiàn)了（ ）次。
A.6 B.5 C.4 D.3 E.2
2.設(shè)全集I={a,b,c,d,e,f,g,h}，集合A={a,b,c,d,e,f}，B={c,d,e}，C={a,d}，那么集合A∩B∩~C為（ ）。
A.{c,e} B.{d,e} C.{e} D.{c,d,e} E.{d,f}
3.和十進(jìn)制數(shù)23的值相等的二進(jìn)制數(shù)是（ ）。
A.10110 B.11011 C.11011 D.10111 E.10011
4.完全二叉樹的交點(diǎn)個數(shù)為11，則它的葉結(jié)點(diǎn)個數(shù)為（ ）。
A.4 B.3 C.5 D.2 E.6
5.平面上有五個點(diǎn)A（5,3),B(3,5),C(2,1),D(3,3),E(5,1)。以這五點(diǎn)作為完全圖G的頂點(diǎn)，每兩點(diǎn)之間的直線距離是圖G中對應(yīng)邊的權(quán)值。以下哪條邊不是圖G的最小生成樹中的邊（ ）。
A.AD B.BD C.CD D.DE E.EA
6.Intel的首顆16位處理器是（ ）。
A.8088 B.80386 C.80486 D.8086 E.Pentium
7.處理器A每秒處理的指令時處理器B的2倍。某一特定程序P分別編譯為處理器A和處理器B的指令，編譯結(jié)果處理器A的指令數(shù)是處理器B的4倍。已知程序P在處理器A上執(zhí)行需要1個小時，那么在輸入相同的情況下，程序P在處理器B上執(zhí)行需要（ ）小時。
A.4 B.2 C.1 D.1/2 E.1/4
8.以下哪個不是計算機(jī)的輸出設(shè)備（ ）。
A.音箱 B.顯示器 C.打印機(jī) D.掃描儀 E.繪圖儀
9.下列活動中不屬于信息學(xué)奧賽的系列活動的是（ ）。
A.NOIP B.NOI C.IOI D.冬令營 E.程序員等級考試
10.以下斷電之后仍能保存數(shù)據(jù)的是（ ）。
A.硬盤 B.寄存器 C.顯存 D.內(nèi)存 E.高速緩存
11.以下哪個軟件不是及時通信軟件（ ）。
A.網(wǎng)易泡泡 B.MSN Messenger C.Google Talk D.3DS Max E.QQ
12.下列關(guān)于高級語言的說法錯誤的是（ ）。
A.Fortan是歷史上的第一個面向科學(xué)計算的高級語言
B.Pascal和C都是編譯執(zhí)行的高級語言
C.C++是歷史上的第一個支持面向?qū)ο蟮恼Z言
D.編譯器將高級語言程序轉(zhuǎn)變?yōu)槟繕?biāo)代碼
E.高級語言程序比匯編語言程序更容易從一種計算機(jī)移植到另一種計算機(jī)上
13.下列設(shè)備不具有計算功能的是（ ）。
A.筆記本電腦 B.掌上電腦 C.智能手機(jī) D.電子計算機(jī) E.液晶顯示器
14.常見的郵件傳輸服務(wù)器使用（ ）協(xié)議接收郵件。
A.HTTP B.SMTP C.TCP D.FTP E.POP3
15.下列瀏覽器中，由微軟公司開發(fā)的瀏覽器是（ ）
A.Internet Explore B.Netcape C.Opera D.Firefox E.Mozilla
16.一位藝術(shù)史學(xué)家有2000幅真彩色圖像，每幅圖像約占3M空間。如果將這些圖像以位圖形式保存在CD光盤上（一張CD光盤的容量按600M計算），大約需要（ ）張CD光盤。
A.1 B.10 C.100 D.1000 E.10000
17.設(shè)A=true，B=false，C=false，D=true，以下邏輯運(yùn)算表達(dá)式值為真的是（ ）。
A.(A∧B)∨(C∧D) B.((A∧B)∨C)∧D C.A∧((B∨C)∧D)
D.(A∧(B∨C))∨D E.(A∨B)∧(C∧D)
18.(3725)8+(B)16的運(yùn)算結(jié)果是（ ）。
A.(3736)8 B.(2016)10 C.(1111110000)2 D.(3006)10 E.(7B0)16
19.二叉樹T的寬度優(yōu)先遍歷序列為A B C D E F G H I，已知A是C的父交點(diǎn)，D是G的父交點(diǎn)，F(xiàn)是I的父交點(diǎn)，數(shù)中所有結(jié)點(diǎn)的最大深度為3，（根結(jié)點(diǎn)深度設(shè)為0），可知F的父結(jié)點(diǎn)是（ ）。
A.無法確定 B.B C.C D.D E.E
20.設(shè)棧S的初始狀態(tài)為空，元素a,b,c,d,e,f,g依次入棧，以下出棧序列不可能出現(xiàn)的是（ ）。
A.a,b,c,e,d,f,g B.b,c,a,f,e,g,d C.a,e,d,c,b,f,g
D.d,c,f,e,b,a,g E.g,e,f,d,c,b,a
二.問題求解（請在空格處填上答案，每空5分，共10分）
1.將數(shù)組{32,74,25,53,28,43,86,47}中的元素按從小到大的順序排列，每次可以交換任意兩個元素，最少需要交換___次。
2.有3個課外小組：物理組，化學(xué)組和生物組。今有張、王、李、趙、陳、5名同學(xué)，已知張、王為物理組成員，張、李、趙為化學(xué)組成員，李、趙、陳為生物組成員。如果要在3個小組分別選出3位組長，一位同學(xué)最多只能擔(dān)任一個小組的組長，共有___種選擇方案。



三.閱讀程序（共4題，每題8分，共計32分）
1. var
a,b : integer;
begin
read(a);
b:=(a*(a*a))+1;
if b mod 3 = 0 then b := b div 3;
if b mod 5 = 0 then b := b div 5;
if b mod 7 = 0 then b := b div 7;
if b mod 9 = 0 then b := b div 9;
if b mod 11 = 0 then b := b div 11;
if b mod 13 = 0 then b := b div 13;
if b mod 15 = 0 then b := b div 15;
writeln((100*a-b) div 2);
end.
輸入：10
輸出：_____
2. var
str : string;
i : integer;
begin
str := 'Today-is-terrible!';
for i := 7 to 11 do
if str[i] = '-' then str[i-1] := 'x';
for i := 13 downto 1 do
if str[i] = 't' then str[i+1] := 'e';
writeln(str);
end.
輸出：_____
3. var
a,b,c,p,q : integer;
r : array[0..2] of integer;
begin
read(a,b,c);
p := a div b div c;
q := b - c + a + p;
r[0] := a * p div q *q;
r[1] := r[0] * (r[0] - 300);
if (3 * q - p mod 3 <= r[0]) and (r[2] =r[2]) then
r[1] := r[r[0] div p mod 2]
else r[1] := r[r[0] div p mod 2];
writeln(r[0] - r[1]);
end.
輸入：100 7 3
輸出：_____
4. var
str : string;
len,i,j : integer;
nchr : array[0..25] of integer;
mmin : char;
begin
mmin := 'z';
readln(str); len := length(str);
i := len;
while i>= 2 do begin
if str[i - 1] < str[i] then break; dec(i);
end;
if i = 1 then begin
writeln('No result!'); exit;
end;
for j := 1 to i - 2 do write (str[j] < mmin) then
fillchar(nchr,sizeof(nchr),0);
for j := i to len do begin
if (str[j] > str[i - 1]) and (str[j] < mmin) then
mmin := str[j];
inc(nchr[ord(str[j]) - ord('a')]);
end;
dec(nchr[ord(mmin) - ord('a')]);
inc(nchr[ord(str[i - 1]) - ord('a')]);
write(mmin);
for i := 0 to 25 do
for j := 1 to nchr[i] do
write(chr(i + ord('a')));
writeln;
end.
輸入：zzyzcccbbbaaa
輸出：_____
四.完善程序(前4空，每空2分，后5空，每空4分，共28分）
1.判斷質(zhì)數(shù)
題目描述：
給出一個正整數(shù)，判斷這個數(shù)是否是質(zhì)數(shù)。
輸入：
一個正整數(shù)n(1 ≤ n ≤ 10000)。
輸出：
如果n是質(zhì)數(shù)，輸出"YES"；否則，輸出"NO"。
輸入樣例：
10
輸出樣例：
NO
程序：
var
① : integer;
begin
read(n);
if n = 2 then writeln( ② )
else if ( ③ ) or (n mod 2 = 0) then writeln('NO')
else begin
i := 3;
while i * i <= n do begin
if ④ then begin
writeln('NO'); exit;
end;
i := i + 2;
end;
writeln('YES');
end;
end.
2.木材加工
題目描述：
木材廠有一些原木，現(xiàn)在想把這些木頭切割成一些長度相同的小段木頭（木頭有可能有剩余），需要得到的小段的數(shù)目是給定的。當(dāng)然，我們希望得到的小段越長越好，你的任務(wù)是計算能夠得到的小段木頭的最大長度。木頭長度的單位是cm。原木的長度都是正整數(shù)，我們要求得到的小段木頭的長度也是正整數(shù)。
輸入：
第一行是兩個正整數(shù)N和K（1 ≤ N ≤ 100000，1 ≤ K ≤ 10000），N是原木的數(shù)目，K是需要得到的小段的數(shù)目。
接下來的N行，每行有一個1到10000之間的正整數(shù)，表示一根原木的長度。
輸出：
輸出能夠切割得到的小段的最大長度。如果連1cm長的小段都切不出來，輸出"0"。
輸入樣例：
3 7
232
124
456
輸出樣例：
114
程序：
var
n,k :integer;
len : array[1..10000] of integer;
i,left,right,mid : integer;
function isok(t : integer) : boolean;
var
num,i : integer;
begin
num := 0;
for i := 1 to n do begin
if num >= k then break;
num := ① ;
end;
if ② then isok := true
else isok :=false;
end;
begin
readln(n,k);
right := 0;
for i := 1 to n do begin
readln(len[i]);
if right < len[i] then right := len[i];
end;
inc(right); ③ ;
while ④ < right do begin
mid := (left + right) div 2;
if ⑤ then right := mid
else left := mid;
end;
writeln(left);
end.
一. 選擇一個正確答案代碼（A/B/C/D/E）,填入每題的括號內(nèi) (每題1.5分,多選無分, 共30 分)
題號 1 2 ３ 4 5 6 7 8 9 10
選擇 B A D E D D B D E A
題號 11 12 13 14 15 16 17 18 19 20
選擇 D C E E A C D B C E
二．問題解答 （每題5分，共10分）
1. 答： 5
2. 答： 11
三. 閱讀程序，并寫出程序的正確運(yùn)行結(jié)果：（每題8分，共32分）
(1) 程序的運(yùn)行結(jié)果是: 499
(2) 程序的運(yùn)行結(jié)果是: Today-ix-terrible!
(3) 程序的運(yùn)行結(jié)果是: -7452
(4) 程序的運(yùn)行結(jié)果是: zzzaaabbbcccy
四.根據(jù)題意, 將程序補(bǔ)充完整 (前4空，每空2分，后5空，每空4分，共28分)
pascal 語言
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
1.① n, i （或者 i, n）
② 'YES'
③ n = 1 (或者 n – 1 = 0) 　　　
④ n mod i = 0 　　　　 　　　　 　
2.① num + len[i] div t 　
② 　 num >= k　　　　 　
③ 　 left := 0 　
④ left + 1 　 　
⑤ not isok(mid) （或者 isok(mid) = false）

展開更多......

收起↑