新餘四中資訊科技奧賽
選拔試題（二）
一.單選題或填空題（每題1.5分，共24分）
1． 下面pascal迴圈語句的迴圈次數是——。
i：=1;
repeat
i：＝i+2
untili＝20；
2． 若想利用語句fori：＝1to5d0readn(i)，迴圈輸入資料，下面的輸入格式
lu2／3u4／5u6／7u8／9u10／
將使a[4]的值為——。
(注：用「u」表示空格，用「／」表示換行。)
3． 如果r＝1.23，i＝45，c＝』6』，則以下輸出語句的輸出結果為——。
write(r：6：3，r：5，c：4)；
(用「u」表示乙個空格)
4． 下面pascal迴圈語句執行的迴圈次數是——。
x：=2；
y：＝40；
whiley＞=xd0x：＝x+x
5． 對於迴圈語句：fori：＝mtond0，其中i，m,n均為整型變數，且n＞m，則迴圈體被執行次。
6． 設整型變數i和j的值分別為2和5，布林變數b的值為false。計算表示式b＝(j—i＞2)andnot(i＞j)0r(i＜＞3)andb的值——。
7． 表示式trunc(4.7)modround(3.9)的值是——。
8． 表示式chr(ord(succ(』f』))+2)的值是——。
9． pascal表示式odd(i)0rodd(i+1)的值是——。
10． 變數說明如下
varch1,ch2:'a'..'f';
week:(sun,mon,tue,wed,thu,fri,sat);
且ch1:='d';ch2:='g';week:=tue；則表示式ord(week)mod(ord(ch2)-ord(ch1))的值是——。
11． 下列解析度的顯示器所顯示出的影象，最清晰的是( )。
a)800*600 b)1024*768 c)640*480 d)1280*1024 e)800*1000
12. 表示式(2008)10－(3723)8的結果是( )。
a) (-1715)10 b) (5)10 c) (-5)16 d) (111)2 e) (3263)8
13假設a=true，b=false，c=true，d=true，邏輯運算表示式a∧b∨c∧d的值是( )。
a)true b)false c)0 d)1 e)null
14 第乙個給計算機寫程式的人是( )。
a)alan mathison turing
b)ada lovelace
c)john von neumann
d)john mccarthy
e)edsger wybe dijkstra
15 cpu訪問記憶體的速度比訪問下列哪個儲存裝置要慢( )。a)暫存器 b)硬碟 c)軟盤 d)磁帶 e)光碟
16．多**計算機是指()計算機。
a)專供家庭使用的b)裝有cdrom的
c)連線在網路上的高階d)具有處理文字、圖形、聲音、影像等資訊的
二．問題求解(每題5分，共10分)
1．現在市場上有一款汽車a很熱銷，售價是2萬美元。汽車a每加侖汽油可以行駛20英里。普通汽車每年大約行駛12000英里。
油價是每加侖1美元。不久我公司就要推出**節油汽車b，汽車b每加侖汽油可以行駛30英里。現在我們要為b制定**(它的**略高於a)：
我們預計如果使用者能夠在兩年內通過節省油錢把b高出a的價錢彌補回來，則他們就會購買b，否則就不會購買b。那麼b的最**格應為萬美元。
2．在a,b,c,d,e,f六件物品中，按下面的條件能選出的物品是： 。
(1)a,b兩樣至少有一樣
(2)a,d不能同時取
(3)a,e,f中必須有2樣
(4)b,c要麼都選，要麼都不選
(5)c,d兩樣中選一樣
(6)若d不選，則e也不選
三．閱讀程式(每題8分，共40分)
1．program programl；
vara，x，y，okl，ok2：integer；
begin
a ：=100：
x：=l0；
y：=20；
okl：=5：
ok2：=0；
if ((x>y) or ((y<>20) and (okl=0)) and (ok2<>0)) then
a：=1
else if ((okl<>0) and (ok2=、0)) then
a：=-1
else
a：=0；
writeln(a)；
end．
輸出：2．program program2；
vara，t：string；
i，j：integer；
begin
a：=`morning`；
j：= l；
for i：=2 to 7 do
if (a[j]輸出：
3．program program4；
vara： array[0．．5] of integer；
sum，n，max，i，j，k：integer；
cover：array[0．．22000]of boolean；
begin
read (a[5]，a[4]，a[3]，a[2]，a[1]，a[0])；
if ((a[5]=0) and (a[3]=0) and (a[1]=0)) then
begin
a[5]：=a[4]；a[4]：=a[2]； a[3]：=a[0]； a[2]：=0 a[0]：=0；
end：
for i：=0 to 5 do
if (a[i]>10) then a[i]：=10+(a[i] mod 2)；
sum：=0：
for i：=0 to 5 do sum：=sum+a[i]*(6-i)；
if ((sum mod 2) <>0) then begin
writeln(`can``t be divided.`)；
exit;
end;
sum：=sum div 2； max：=0； cover[0]：=true；
for i：=1 to sum*2 do cover[i]：=false；
for i：=0 to 5 do
begin
j：=0；
while (j輸入：4 7 9 20 56 48 輸入：1000 7 101 20 55 1 輸入：2000 5 l 1 0 0
輸出： 輸出輸出：
4．program gao7_2；
var p，q，s，t：integer；
begin
readln(p)；
for q：=p+1 to 2*p do
begin
t:=0；s:=(p*q)mod(q-p)；
if s=0 then begin t:=p+q+(p*q)div(q-p)；write(t：4)；end；
end；
end.
輸入12 輸出
5.program gao7_4；
var x，y1，y2，y3：integer；
begin
readln(x)；y1：=0；y2：=1；y3：=1；
while y2<=x do
begin
y1：=y1+1；y3：=y3+2；y2：=y2+y3
end；
writeln(y1)；
end.
輸入：23420 輸出：
四．完善程式題（每空3分，共27分）；
1。從鍵盤輸入一串字元，以』#』號結束，分別計算大、小寫字母和數字的個數，並輸出。
program zifu(input,output);
var ch:char; a,b,c:integer;
begin
read(ch);
………….1……………………
while …………2…..do begin
if (ch>=』a』) and (ch<=』z』) then …….3….;
if ………..4………………then b:=b+1;
if (ch>=』0』)and (ch<=』9』) then c:=c+1;
read(ch); end;
……….5……..;
end.
2.把一元鈔票換成一分、二分、五分硬幣（每種至少一枚），有哪些種換法？【答案】461種
program huanqian;
var i,j,k,total:integer;
begin
6…………
for i:=1 to 99 doi:二分硬幣最多99枚}
for ………..7……. do
for k:=1 to 19 do
if ……….8……. then begin
writeln(i:3,j:3,k:3);
9……….
end;
writeln(total);
readln;
end.
陽春市第四中學資訊科技校本研修管理方案
2016.4 為了解決教學中存在的理念與實踐脫節 決策與操作脫節 新課程與課堂教學脫節 內容與評價脫節的等問題，優化課堂教學，轉變學習方式，推進教師專業發展，深化校本教研，促進教師專業化成長，提高學校教育教學質量，努力辦人民滿意教育，特制定本方案。一 總體目標 樹立教師主動運用資訊科技促進專業發展的...
初中資訊科技《在windows中畫圖》教案
一 教學目標 掌握常用畫圖工具的使用，學會簡單的圖形編輯操作。一 教學過程 談話匯入 師問 你們喜歡畫畫嗎？生答 喜歡 看，這就是用畫圖軟體畫出的，漂亮嗎？教師逐一展開畫圖作品 這節課老師就能教會你畫出下面的圖畫。1 開啟畫圖 同學們自己動手操作，在開始選單中找到 畫圖 所需的軟體並啟動畫圖程式。提...
初中資訊科技教學中的評價策略研究
作者 曹罡 新課程 下旬 2019年第02期 摘要 初中階段作為學生正式接觸資訊科技教學的時期，是學生樹立正確的資訊價值觀以及提公升運用資訊科技的能力 全面提高資訊素養非常關鍵的乙個教育階段，所以抓好初中階段的資訊科技教學對學生來說刻不容緩。而抓好初中階段這方面的教學不僅需要教師對學生進行課程內容的...