第十二屆紹興市少兒信息學(xué)奧賽--初賽試題(PASCAL)(共10頁)

1、精選優(yōu)質(zhì)文檔-傾情為你奉上第十二屆紹興市少兒信息學(xué)競賽初 賽 試 題（小學(xué)組 PASCAL語言 二小時(shí)完成）全部試題答案都要求寫在答卷紙上，寫在試卷上一律無效一、選擇一個(gè)正確答案代碼（A/B/C/D），填入每題的括號內(nèi)（每題2分，每題只有一個(gè)正確答案，多選無分。共20分）1. 我們要養(yǎng)成正確的鍵盤輸入習(xí)慣，那么請問按正確指法擊T鍵，應(yīng)使用（ ）A)右手食指B)右手中指C)左手食指D)左手中指2每個(gè)不同的二進(jìn)制數(shù)可以表示一種顏色，如果一幅圖像有256種顏色，最少需要幾位二進(jìn)制數(shù)來表示？ （ ）A)8B)16C)128D)2563以下運(yùn)算結(jié)果為False的是 （ ）A)not (5>5)B)

2、(5>=4) and (7<7)C)not (false)D)(5<4) or (5>=5)4在Free Pascal中運(yùn)行某一程序時(shí)，返回如下圖所示的錯(cuò)誤信息，這是由于( )A)找不到輸入文件B)源程序存在2號語法錯(cuò)誤C)輸入變量的值與變量的類型不匹配D)Pascal編譯器沒有正確安裝5二維數(shù)組A的每個(gè)元素是由6個(gè)字符組成的串。其行下標(biāo)從0到8，其列下標(biāo)從0到9，若按行優(yōu)先存儲(chǔ)，元素A74的起始地址與當(dāng)A按列優(yōu)先存儲(chǔ)時(shí)（ ）的起始地址相同，設(shè)每個(gè)字符占一個(gè)字節(jié)。A)A28B)A39C)A57D)A086.ASCII碼表中的大寫字母Z后有6個(gè)其他字符，接著便是小寫字母。

3、現(xiàn)在已知：字母Y的ASCII碼為（）2，則字母a的ASCII碼用十六進(jìn)制表示是 （ ）A)61HB)62HC)63HD)64H7.下列軟件不能用于瀏覽網(wǎng)頁的是 ( )A)FirefoxB)Internet ExplorerC)AccessD)騰訊TT8.路人甲要拍攝一些學(xué)校風(fēng)景照片,并對拍攝的照片進(jìn)行處理,下列采集工具、加工軟件可實(shí)現(xiàn)這一功能的是（）A)數(shù)碼相機(jī)、photoshopB)掃描儀、goldwaveC)數(shù)碼攝像機(jī)、goldwaveD)手機(jī)、access9.某電影的評價(jià)如圖所示： 圖中的評價(jià)方式屬于（）A)個(gè)人推薦B)統(tǒng)計(jì)評價(jià)C)專家推薦D)核心刊物評價(jià)10.某用戶微博的相關(guān)統(tǒng)計(jì)如圖所

4、示：圖中的“圍觀”數(shù)主要體現(xiàn)了該用戶微博信息的（）A)安全性B)真?zhèn)涡訡)共享性D)載體依附性二、根據(jù)要求回答問題：（5510分）1. 地球人都知道斐波那契數(shù)列的遞推關(guān)系式為：現(xiàn)在給你一列數(shù)2,3,6,8,8,4,2,，如果用f（n）表示這個(gè)數(shù)列的第n個(gè)數(shù)，請寫出這個(gè)遞推式。2學(xué)校里共有12間宿舍，大宿舍住8人，中宿舍住7人，小宿舍住5人，現(xiàn)在每間宿舍都住滿了，共住了80個(gè)人，問大、中、小宿舍各有多少間？三、閱讀程序并寫出運(yùn)行結(jié)果（8888+840分）：1. program test1;var a,b,c,d,e,ans: integer; begin readln(a,b,c); d:=a+

5、b; e:=abs(b-c);ans:=trunc(d+e)/(c-a); writeln(ans); end輸入：1 2 5 輸出：_ 2. program test2;var n,m:longint;Begin Readln(n,m); n:=n mod 7; m:=m mod 5; If n>m then writeln(n) else writeln(m)End.輸入：2014 2015輸出:_3. program test3;var n,x,i,temp,j,count:longint;begin readln(n,x); for i:=1 to n do begin temp

6、:=i; while temp>0 do begin j:=temp mod 10; temp:=temp div 10; if j=x then inc(count); end;end;writeln(count);end.輸入：100 5輸出：_4program test4;var i,j,k,n:integer; a:array1.100 of boolean;begin read(n); for i:=1 to n do ai:=true; for i:=1 to n do begin j:=i; while j<=n do begin aj:=not(aj); j:=j+

7、i; end; end; for i:=1 to n do if ai=true then write('0',' ') else write('1',' ');end.輸入：8輸出:_5program test5;type arr=array1.8 of integer;var a:arr; i,n:integer;procedure select(var b:arr; var n:integer); var i,j:integer;begini:=0;for j:=1 to n do if bj mod 3=0 then be

8、gin i:=i+1; bi:=bj; end;n:=i;end;begin n:=8; for i:=1 to n do read(ai); readln; select(a,n); for i:=1 to n do write(ai:3); writeln;end.輸入：8 151 9 7 233 68 514 12輸出: _四、完善程序（根據(jù)問題要求和已有程序，在程序空格處填入適當(dāng)?shù)恼Z句或符號，使程序完整。本題每空3分，共15+15=30分）1打印文件【問題描述】路人甲畢業(yè)于某職業(yè)學(xué)校計(jì)算機(jī)專業(yè)，不過，想找一份好工作真難，在路人乙的推薦下，A公司聘請他擔(dān)任文印室打印員。每天8點(diǎn)前，A公司

9、的各個(gè)部門都會(huì)把需要打印的文件送過來。一天的工作就這樣開始了，起先路人甲按照文件送來的先后順序打印，一段時(shí)間后，路人甲覺得這個(gè)工作非常無聊，于是決定改變打印的順序。首先他要求每個(gè)部門對送過來的文件都要標(biāo)上重要度急別p（1<=p<=9），接著他再給送過來的n個(gè)文件按先后順序從0開始標(biāo)上號碼，然后，他按標(biāo)號從小到大處理打?。簩τ诋?dāng)前的第一個(gè)文件a，若后面存在一個(gè)未打印的文件b, b文件的重要度大于a文件，則將a轉(zhuǎn)移至最后，否則打印文件a。打印每個(gè)文件需1 分鐘，轉(zhuǎn)移文件可認(rèn)為是瞬間完成的。路人甲還充分發(fā)揮自己的專業(yè)特長，編寫了一個(gè)程序，只要第一行輸入文件數(shù)n和需要查詢的文件標(biāo)號x，第二

10、行依次輸入n個(gè)文件的重要度級別。就可輸出打印x號文件時(shí)的時(shí)間?！緲永斎搿?6 0 1 1 9 1 1 1 【樣例輸出】 5算法：循環(huán)隊(duì)列模擬。如果隊(duì)首元素的優(yōu)先級不是最高，把隊(duì)首元素放到最后，其它元素前移，否則，隊(duì)首元素出隊(duì)。program test6;const max=100+10;type printer=record flag:longint; priority:longint; end;var ans,i,k,j,n,m:longint; printers:array0.max of printer; b:boolean; temp:printer;begin readln(n,m

11、); for j:=0 to n-1 do with printersj do begin read(priority); if j=m then flag:=1 else ; end; ans:=0; while true do begin b:=false; for j:=1 to n-1 do if printersj.priority>printers0.priority then begin temp:=printers0; for k:=1 to n-1 do ; printersn-1:=temp; b:=true; end; if not b then begin inc

12、(ans); if printers0.flag=1 then begin ; break; end else begin for j:=1 to n-1 do printersj-1:=printersj; ; end; end; end;end.2獎(jiǎng)學(xué)金【問題描述】某小學(xué)最近得到了一筆贊助，打算拿出其中一部分為學(xué)習(xí)成績優(yōu)秀的前5名學(xué)生發(fā)獎(jiǎng)學(xué)金。期末，每個(gè)學(xué)生都有3門課的成績：語文、數(shù)學(xué)、英語。先按總分從高到低排序，如果兩個(gè)同學(xué)總分相同，再按語文成績從高到低排序。任務(wù)：先根據(jù)輸入的3門課的成績計(jì)算總分，然后按上述規(guī)則排序，最后按排名順序輸出前5名學(xué)生的學(xué)號和總分。注意，在前5名同學(xué)中，每個(gè)人

13、的獎(jiǎng)學(xué)金都不相同，因此，你必須嚴(yán)格按上述規(guī)則排序。例如，在某個(gè)正確答案中，如果前兩行的輸出數(shù)據(jù)（每行輸出兩個(gè)數(shù)：學(xué)號、總分）是：7 2795 279這兩行數(shù)據(jù)的含義是：總分最高的兩個(gè)同學(xué)的學(xué)號依次是7號、5號。這兩名同學(xué)的總分都是279（總分等于輸入的語文、數(shù)學(xué)、英語三科成績之和），但學(xué)號為7的學(xué)生語文成績更高一些。如果你的前兩名的輸出數(shù)據(jù)是：5 2797 279則按輸出錯(cuò)誤處理，不能得分?！据斎搿枯斎氚琻+1行：第1行為一個(gè)正整數(shù)n，表示該校參加評選的學(xué)生人數(shù)。第2到n+1行，每行有3個(gè)用空格隔開的數(shù)字，每個(gè)數(shù)字都在0到100之間。第j行的3個(gè)數(shù)字依次表示學(xué)號為j-1的學(xué)生的語文、數(shù)學(xué)、英

14、語的成績。每個(gè)學(xué)生的學(xué)號按照輸入順序編號為1n（恰好是輸入數(shù)據(jù)的行號減1）。所給的數(shù)據(jù)保證總分相同的情況下，語文成績一定不同?！据敵觥枯敵龉灿?行，每行是兩個(gè)用空格隔開的正整數(shù), 依次表示前5名學(xué)生的學(xué)號和總分?！緲永斎搿?80 89 8989 97 7890 67 8087 66 9181 89 8888 99 7767 89 6478 89 98【樣例輸出】8 2652 2646 2645 2581 258【限制】 100%的數(shù)據(jù)滿足：6<=n<=300program test7;typelei=record sum,num,yuwen,shuxue,yingyu:integer; end;varst:array1.500of lei;temp:lei;i,j,n:integer;beginreadln(n);for i:=1 to n do with do begin num:=i; readln(yuwen,shuxue,yingyu); ;