信息學(xué)競賽初中組初賽模擬試題

信息學(xué)競賽初中組初賽模擬試題（一一、選擇題（201.530510題為單選題，即每題有且只有一個正確答案，選對得分；后10題為選擇15） ）A）MS- D）Windos 40B)40*1000C)40*1024*1024 ）AB- B)ABC+D/- E)CD/-設(shè)一個[1..100,1..100]的二維數(shù)組A,每個元素A[i,j]時(shí)占用兩個字節(jié),將A數(shù)組按行優(yōu)先方式存入從SA開始的連續(xù)單元中,則元素A[66,65]的結(jié)束 A) B)非順序的線性表結(jié)順序的非線性表結(jié) D)非順序的非線性表結(jié)E)特殊的樹結(jié)構(gòu)計(jì)算機(jī)輔助教學(xué)的簡寫是

刪除一個數(shù)位上的數(shù)字），每次刪除后按原來的次序組成一個新數(shù)M的值均是當(dāng)前狀態(tài)下的最小數(shù)，則第四次應(yīng)該刪除的數(shù)字是( 順 E)重 C)機(jī) A)屬于計(jì)算機(jī)軟 B)屬于硬下列關(guān)于十進(jìn)制數(shù)-100 B)反碼為E4H C)反碼為9BH D)補(bǔ)碼為64H 為9CH C)O(n)17．下列是關(guān)于數(shù)據(jù)結(jié)構(gòu)的說法正確的是（）。 ） )二.問題求解（5*2=10）已知:1101、72，3，5110002，3，5整除？1,2,3,..n,有多少種不同的出棧序列?如時(shí),出棧序列有 3,2,1共5種，問三.閱讀程序?qū)懗稣_的程序運(yùn)行結(jié)果(4分*8=32programvara,b,n:longint;untilb>=n;輸入:20100program

constvarsi,pr:setof2..n;whilenot(xinsi)dox:=succ(x);whilej<=mbeginsi:=si-[j];j:=j+x;end;untilsi=[];forx:=mdownto2doifxinprthenifjmod10=0thenwrin;輸入：50輸出：programvara:array[1..9,1..9]ofstring;wrin('pleaseinputastring(length<10):');until(n<10)andodd(n);m:=(n+1)div2;

fen(m,n,'fori:=1tonforj:=1tondoa[i,j]:='';fori:=1tomdoforj:=iton+1-idoforj:=ndownto1dofori:=1tondowrite(a[i,j]:2);

輸入:5 輸出四.完善程序題(4*4+2分*6=28G=(v,e)v1vv1vd[j]：v1vjpath[j]：v1vjprogramconstn=5;maxnum=1e10;ofdt=array[1..n]輸入jh=setofpt=array[1..n]4.programvarprocedurefen(i,j:byte;s:string);vark:byte;ifj=1thenwrin(m,'=',s,i)elsefork:=1toi-j+1do

fori:=1tonforj:=1tondoread(cost[i,j]);fori:=2tondoifd[i]<maxnumthen

fori:=1ton-1doforj:=2ton

programif

Vari,j,n,k:beginmm:=d[j];k:=j;end;forj:=2tonifnot(jins)and(cost[k,j]<maxnum)

a:array[1..100]ofinteger;b,d:array[0..100]ofinteger;p:array[1..30]ofinteger;if（3）

path[j]:=（4）

forI:=1tondoread(a[I]);forI:=0tondob[I]:=1;while(b[0]=1)wrifori:=2tondoforj:=2tonifjinpath[i]thenwrite('->','v',j);

forI:=1tokdo（5）;forI:=1tondo （6）;forI:=1tok-1doforj:= do

if

2.問題描述:將nk(k≤n,kforI:=1todowhile forI:=j+1todoj:=j-do ;wriforI:=1tondowrite(d[I]:40);信息學(xué)競賽初中組初賽模擬一、選擇題：（201-15116-20225）對器按字節(jié)進(jìn)行編址，若某器共有10根地址線的引腳，則該器的容量為( (A) (B) (C) (E)已知數(shù)組a中，每個元素a[i,j]在時(shí)要占3個字節(jié)，設(shè)i從1變化到8，j從1變化到10，分配內(nèi)存實(shí)是從地址sa開始連續(xù)按行分配的。試問：a[5，8]的起始地址為()。 (A)數(shù)值 (B)地址 一個24*24點(diǎn)陣的漢字字形信息所占的字節(jié)數(shù)為( (A) (B) (C)硬

()。(A) (B)10110100011(C)11101010001(D)11110100011(E)111000設(shè)棧S的初始狀態(tài)為空,現(xiàn)對序列{1,2,3,4,5}在棧S上,依次進(jìn)行如下操作(從元列是()。(A){1,2,3}B){1,3,2}C)3,2,1}D{2,3,1}(E)10.E-mail(A)文件(B)電報(bào)(C)(D)傳真(E) (A)2h- (B)2h- G=(V，EV={a,b,c,d,e,f}, (A)a,b,e,c,d,f(B)a,c,f,e,b,d(C)a,e,b,c,f,d(D)a,b,e,d,f,c(E)以上都不對pascal編譯程序是 （A）.pascalEXE（B）.pascal（D）.pascalEXE（E）. （D）． 種 ） （A）．主機(jī)（B）.光驅(qū) （D）.音箱 （E）.超級17.正確的二維數(shù)組類型說明是 typear2=array[1..5,5..1]oftypear2=array[1..5]ofarray[5.1]of 三、寫出程序的運(yùn)行結(jié)果：（每小題6分，共30分(C)typear2=array[1..5,1..5]of program(D)typear2=array[1..5]ofarray[1..5]ofconst(E)typear2=array[1..5,1..5]ofvar （A）信息加工（B）信息分 （C）（D）信息fori:=-nton信息 ）(A)被終止執(zhí)行(B)被暫停執(zhí)行(C)被轉(zhuǎn)入(D)繼續(xù)執(zhí)行（E）以上答案write('':39-forj:=-ktok20.下面的常量說明中，正確的是 ifabs(j)>k- thenwrite(n-(i+n)div elsewrite('t= b,C= M= N=1wri a=二、問題求解：（第1小題5分，第2-3小題各413分[問題1]:在所有三位數(shù)中，各位數(shù)字從到低位順次減小的數(shù)共有一位銀礦勘探員無力預(yù)付3月份的房租。他有一根長31英寸的純銀條，因此他和女房東達(dá)成如下協(xié)議。他說，他將把銀條切成小段。31英寸長的一段，然后每天給她增加1英寸，以此作為抵押?？碧絾T預(yù)期到3月份的最后一天，他能全數(shù)付清，而屆時(shí)女房東將把銀條小段全部還給他。3月份有31天，一種辦法是把銀條切成31段，每段長1英寸?？墒沁@處花很多功夫?？?不開，后來這位顧客提出：把50美分的鈔票換成硬幣，但出納又說換不開， 也無法把25美分、10美分、5美分的鈔票換成硬幣。請問錢

PROGAMVARa:ARRAY[1..10]OFk:Integer；ch:Char；FORk:=1TO10DOa[k]:=Chr(Ord('A')+k)；FORk:=1TO10DOFORk:=1TO10DO programtext3(input,output);Varm,n,p:integer;proceduremm(varm:integer;x:real);varn:integer;

forj:=0ton-1do

n

5.programtext5(input,output);varch:char;beginsum:=0;casech'A':fori:=4to6do二、4.programtext4;constn=5;typeary=array[0..n-1,0..n-1]ofinteger;vara:ary;i,j,k:integer;fori:=0ton-1forj:=0ton-1doa[i,j]:=0;fori:=1tonforj:=n-1downtoidofori:=0ton-1do

'B'：beginread(n);fori:=1tonbeginread(n);sum:=sum＋nend;untilsum>10;'D':beginwhilen<=3beginsum:=sum＋n;read(n)end;wrin(sum:4)A4123456789 B4123456789 C4123456789

until D4123456789 四、完善程序（第1題每空22、3題每空3分，共32分12：35，57，111315qaprogramp(output); q(a:integer):booklean;

arr=array[1..16]ofstring;arra著從第1屆到第16屆冠軍國家的名字，下面的函數(shù)可求出歷界比賽共有幾個國家曾獲得過冠軍，請?zhí)羁胀瓿?。vark,j,s:integer;(5)forj:=2to16do

whilenotmult

flag:(1) (k<=adiv2)andflagifamodk=0then

if(7)thenmult:=tureelsek:=k+1;ifnotmultthens:=(8) 【第三題】Fibonacci（裴波那契）21，355，89，144，233，377，..0fibonacci：121=89+21+8+3 則輸入ifq(k)and

nfibonaccia（89）an

programtext3(input,output); vara,b,c:integer;

a:=1;c:=(9)untilb>=n;ifb=nthenfind:=(10) elsefind:=(11) procedurep(n:integer);vara:integer;ifa<nthenp

的是 ） 3、計(jì)算機(jī)的傳染是以計(jì)算機(jī)運(yùn)行和（ 中有一個英文簡寫ISP，它的中文意思是（ 5、Internet給我們提供了資源共享、瀏覽、檢索信息和登錄等多種 C． D．E- 6、IE是目前流行的瀏覽器軟件，它的工作基礎(chǔ)是解釋執(zhí)行用（

信息學(xué)競賽初中組初201.530）

7、給出3種排序：插入排序、冒泡排序、選擇排序。這3種排序的時(shí)間代價(jià) B．O(logn)、O(n)、 ）A．7 B．8 E．11 ） A．堆 D．10、在解決計(jì)算機(jī)主機(jī)與之間速度不匹配時(shí)通常設(shè)置一個打印數(shù)據(jù)） A．堆 D． 磁 E．像 A．B．索引C．散列D．順序存 、一個棧的輸入順序?yàn)?、、、、，下列序列中可能是棧的輸出? ）A．正確性 A．?dāng)?shù)組存放的都是同一種類型的數(shù)B．?dāng)?shù)組各維的下標(biāo)范圍必須一C．?dāng)?shù)組在內(nèi)存中的地址是連續(xù)D．?dāng)?shù)組中的下標(biāo)不能是表達(dá)E．?dāng)?shù)組是隨機(jī)存取的數(shù)據(jù)結(jié) ）

B．Pk<Pj<Pii<j<kC．Pj<Pi<Pki<j<kD．Pi<Pk<Pji<j<k ）樹中，頂點(diǎn)N的左右分別是N在原樹里對應(yīng)頂點(diǎn)的（ A．B．最右子頂點(diǎn)/最右的兄弟E．：（2510WPL（48321programtest1；varifn=1thencount：=0ifnmod2=0thencount：=count(ndiv2)+1elsecount：=count(n*3+1)+1；2programfori:=3downto1doforj:=1to3dountilk=j;

3programtest3;vara,b,n:longint;untilb>=n;programtest4;varm,n,i,p,k：integer;r:array[1…200]offorI:=1tom-1dor[i]:=i+1;whilebdoifk=pthenbeginwrin(p);b:=falseendelseifi=n+1then ②;③四、完善程序（共2題，每題1428分;var【程序Programconst typetlist=array[1…maxn]of⑤;tmake=array[0…maxn,0…maxxk]ofwhilei>0variff[i,j]=f[i-1,j]thenelseprocedure⑥;varwrin(‘n=’,n,‘,’,wrin(‘max ;fori:=1tonwrin(‘no.’,i‘,weight:’,w[i]:2,fori:=1ton proceduremake;vari,j:byte;fori:=1tondoforj:=1tow[i]-1doforj:=w[i]toxkdo

【程序programvari,j,s,k,a,b,max:integer;m:array[1…8192]ofinteger;two,v:array[1…20]ofinteger;fori:=1to13 whilec<>‘.’dos:=sshl1+ord(c)- thens:=((s-two[b+1])modtwo[b])+two[b];ifk<bfori:=atok-1 fori:=two[b]totwo[b+1]doifm[i]>0thenforj:=atob-1m[(imodtwo[j])+two[j]]:= fori:=two[a]totwo[b+1]

ifm[i]>maxthen fori:=two[a]totwo[b+1]doifm[i]=maxthenbegininc(j);v[j]:=kmod2; whilej>0dobeginwrite(v[j]);dec(j)end;信息學(xué)競賽初中組初一、選擇題：（每題1.5分，共計(jì)30分。每題有5個選項(xiàng)，前10題為單選題，10題為選擇題，全部選對才得分） A. B. C. D. A.80億 B.100億 C.130億 D.FORI:=1TO5DOFORJ:=2TOIWri E.設(shè)待排序的記錄為（49，38，65，97，76，13，2749,55,4），經(jīng)過下過第一趟：13,27,49,55,4,49,38,65,97,第二趟：13,449,3827,4955,65,97,第三趟：4,1327,3849,4955,65,76,

A.冒泡排 B.直接選擇排 C.直接插入排 D.

E. 3 A.70,65,34,82,53,25,A.B.C.,,,,,,4E.,,,,,,一棵G的生成樹的總邊數(shù)為（ B. C. D. E.+1用二次散列法解決。函數(shù)h1用來計(jì)算散列地址，當(dāng)發(fā)生時(shí)，h2作為計(jì)算下0 A. B. C. E.forh:=1ton-1dobeginx:=A[h+1];kwhile(k>=1)and(A[k]>x)dobeginA[k+1]:=A[k];A[k+1] A.O(nlog2n) B.O(n) C.O(log2n) E.O(2n) A.O(nlog2 B. C.

D.53,25,65,70,34,90,E.65,34,82,70,25,53,在計(jì)算機(jī)運(yùn)行時(shí)，把程序和數(shù)據(jù)一樣存放在內(nèi)存中，這是1946年由 所的研究小組正式提出并論證的。（ B.二叉 C.稀疏矩 D. E.隊(duì)CPU A.6C.2,3,5,6,1,1,3E.）

（832program

A．快速排序B.基數(shù)排序C.希爾排 D.冒泡排 E.

untili=12;二、問題求解題（每題5分，共計(jì)10分

program下圖是一個設(shè)想有11項(xiàng)活動的活動網(wǎng)。其中有9個V1，V2，…V9,每表示在它之前的活動已經(jīng)完成，在它之后的活動可以開始。V1

a:array[1..100]oflongint;varifa[n-1]>0theni:=a[n-elsei:=f(n-ifa[n-2]>0theni:=i+a[n-2]elsei:=i+f(n-2);programexample3fori:=2to6doforj:=1toi-1dofori:=1to6dowriprogramexample4vari,s,max:integer;fori:=1to10doread(a[i]);max:=a[1];s:=a[1];fori:=2to10

ifs<0thens:=0;ifs>maxthenmax:=s;輸入：89–124651115–2814281.n×n1..n（列）無重復(fù)n＝523輸入n（>＝2）和第一行數(shù)字（查錯誤）輸出一個滿足要求的方陣x1n,x0x=x+n，取出第一行的數(shù)。programexample2; a:array[1..maxn]ofinteger;

vara:array[1..n]ofinteger;ifx<=0then write('Entern:');readln(n);if(n<2)or(n>maxn)thenexit;write('Enterfirstline:');forx:=1tondoread(a[x]);forx:=1tondowrite(a[x]:4);fory:=2tondoforx:=1tondowrite(

fori:=1ton-1doa[i]:=i+1; ifk=m untilp=n;出列為止。設(shè)ｎ1，2，…，n，打印出出列的順序。j:=a[j]，m，mprogramexample;const