1、信息學(xué)初賽模擬試題（五）（初中組PASCAL語(yǔ)言，兩小時(shí)完成）一、選擇題：（每題1.5分，共計(jì)30分。每題有5個(gè)選項(xiàng)，前10題為單選題，后10題為不定項(xiàng)選擇題，全部選對(duì)才得分）。1. 二進(jìn)制數(shù)11011011的十進(jìn)制值是（ ）A. 202 B. 219 C. 193 D. 2092. 我國(guó)研制的銀河型的超級(jí)計(jì)算機(jī)通過(guò)基準(zhǔn)程序的測(cè)試，其峰值速度是（ ）A. 80億次B. 100億次 C. 130億次 D. 150億次3. 程序段如下：FOR I:=1 TO 5 DO FOR J:=2 TO I DO Writeln(*)輸出*的個(gè)數(shù)是（ ）A. 5 B. 10 C. 15 D. 25 E. 30

2、4. 設(shè)待排序的記錄為（49，38，65，97，76， 13，27 , 49, 55, 4），經(jīng)過(guò)下過(guò)程將序列排序第一趟：13, 27, 49, 55, 4, 49, 38, 65, 97, 76第二趟：13, 4, 49, 38, 27, 49, 55, 65, 97, 76第三趟：4, 13, 27, 38, 49, 49, 55, 65, 76, 97問(wèn)它所用的方法是：( )A. 冒泡排序 B. 直接選擇排序 C. 直接插入排序 D. 希爾排序5. 設(shè)無(wú)向樹(shù)T有7片樹(shù)葉，其余頂點(diǎn)度均為3，則T中3度頂點(diǎn)有多少個(gè)（ ）A. 5 B. 7 C. 9 D. 4 E. 86. 設(shè)連通圖G的頂點(diǎn)數(shù)

3、和邊數(shù)與一立方體相同，即有8個(gè)頂點(diǎn)和12條邊。任意一棵G的生成樹(shù)的總邊數(shù)為（ ）A7B. 8 C. 9 D. 10E. 117. 設(shè)有兩個(gè)散列函數(shù)h1(k)=k mod 13 和 h2(k)=k mod 11 +1，散列表為T(mén)012，用二次散列法解決沖突。函數(shù)h1用來(lái)計(jì)算散列地址，當(dāng)發(fā)生沖突時(shí)，h2作為計(jì)算下一個(gè)探測(cè)地址的地址增量。假定某一時(shí)刻散列表的狀態(tài)為： 1 2 3 4 5 6 7 8 9 10 11 12 80 44 35下一個(gè)被插入的關(guān)鍵碼為57，其插入的位置為( )。A. 4 B. 5 C. 6 D. 7 E. 8請(qǐng)根據(jù)下面是一段PASCAL程序,判斷第8、9題。for h :=1

4、 to n-1 do beginx :=Ah+1;k :=h;while (k>=1) and (Ak>x) do beginAk+1 :=Ak;k:=k1endAk+1 :=xend8. 假設(shè)在程序開(kāi)始執(zhí)行時(shí)，數(shù)組A1n是一組隨機(jī)整數(shù)。下列答案中，哪一個(gè)最好的描述了最差情況下的程序排序的時(shí)間復(fù)雜度？（ ）A. O(n log2 n) B. O(n) C. O(log2n) D. O(n2) E. O(2n)9. 假設(shè)在程序開(kāi)始執(zhí)行時(shí)，數(shù)組A1n是按關(guān)鍵字非遞減有序排列時(shí)，下列答案中，哪一個(gè)最好的描述了最好情況下的程序排序的時(shí)間復(fù)雜度？（ ）A. O(n log2 n) B. O(

5、n) C. O(log2n) D. O(n2) E. O(2n)10.對(duì)下列四個(gè)序列用快速排序方法進(jìn)行排序，以序列的第一個(gè)元素為劃分的基準(zhǔn)，在第一趟劃分過(guò)程中，元素的移動(dòng)數(shù)最多的是哪一個(gè)序列（ ）A. 70 , 65 , 34 , 82 , 53 , 25 , 90B. 82 , 53 , 25 , 70 , 65 , 34 , 90C. 34 , 25 , 53 , 65 , 90 , 82 , 70D. 53 , 25 , 65 , 70 , 34 , 90 , 82E. 65 , 34 , 82 , 70 , 25 , 53 , 9011.在計(jì)算機(jī)運(yùn)行時(shí)，把程序和數(shù)據(jù)一樣存放在內(nèi)存中，這

6、是1946年由_所領(lǐng)導(dǎo)的研究小組正式提出并論證的。（ ）圖靈 馮·諾依曼布爾赫夫曼哈希12.下面關(guān)于計(jì)算機(jī)的說(shuō)法正確的是（ ）微機(jī)內(nèi)存容量的基本計(jì)量單位是字節(jié)二進(jìn)制數(shù)中右起第10位上的1相當(dāng)于210CPU每執(zhí)行一個(gè)指令，就完成一步基本運(yùn)算或判斷1T=1024MB 32位的計(jì)算機(jī)中的“32”指的是字長(zhǎng)13.為什么說(shuō)PASCAL是“高級(jí)語(yǔ)言”，是因?yàn)樗?）必須在性能較高的機(jī)器上運(yùn)行必須經(jīng)過(guò)良好培訓(xùn)的高水平的程序員使用離機(jī)器的硬件較遠(yuǎn)開(kāi)發(fā)的時(shí)間較長(zhǎng)程序的性能較好14.以下數(shù)據(jù)結(jié)構(gòu)中，哪一個(gè)是線性結(jié)構(gòu)？（ ）A廣義表B. 二叉樹(shù)C. 稀疏矩陣D. 串E. 隊(duì)列15.在下面關(guān)于計(jì)算機(jī)系統(tǒng)硬件

7、的說(shuō)法中不正確的是( )沒(méi)有外部設(shè)備的計(jì)算機(jī)稱為祼機(jī)當(dāng)關(guān)閉計(jì)算機(jī)電源后，RAM中的程序和數(shù)據(jù)就消失了軟盤(pán)和硬盤(pán)上的數(shù)據(jù)均可由 CPU直接存取軟盤(pán)和硬盤(pán)驅(qū)動(dòng)器既屬于輸入設(shè)備又屬于輸出設(shè)備CPU主要由運(yùn)算器、控制器和寄存器組成16. 下面關(guān)于算法的正確說(shuō)法是（ ）算法必須有輸出算法必須在計(jì)算機(jī)上用某種語(yǔ)言實(shí)現(xiàn)算法不一定有輸入算法必須在有限步執(zhí)行后能結(jié)束算法是程序的靈魂17.以下關(guān)于結(jié)構(gòu)化程序的說(shuō)法中，正確的是（ ）結(jié)構(gòu)化程序是由單入口，單出口和循環(huán)三種結(jié)構(gòu)組成結(jié)構(gòu)化程序是出順序、單入中和單出口三種結(jié)構(gòu)組成結(jié)構(gòu)化程序是由順序、循環(huán)和GOTO語(yǔ)句結(jié)構(gòu)組成結(jié)構(gòu)化程序是由順序、循環(huán)和分支三種結(jié)構(gòu)組成“自頂

8、向下，逐步求精”是結(jié)構(gòu)化程序設(shè)計(jì)方法的特點(diǎn)18.棧S最多能容納4個(gè)元素?，F(xiàn)有6個(gè)元素按1，2，3，4，5，6的順序進(jìn)棧，問(wèn)下列哪一個(gè)序列是可能的出棧序列？（ ）5，4，3，2，1，63, 2, 5, 4, 1, 62, 3, 5, 6, 1, 41, 4, 6, 5, 2, 34，5，3，6，2，119.下列排序算法中，哪些排序是不穩(wěn)定的（ ）A快速排序B. 基數(shù)排序C. 希爾排序 D. 冒泡排序 E.選擇排序20.下列說(shuō)法正確的是（ ）解釋程序是接受參數(shù)，按照某一樣板產(chǎn)生機(jī)器語(yǔ)言的計(jì)算機(jī)程序BASIC語(yǔ)言程序通常需解釋執(zhí)行連接程序可以把經(jīng)編譯程序產(chǎn)生的目標(biāo)程序變成可執(zhí)行的機(jī)器語(yǔ)言程序就執(zhí)行速

9、度而言，編譯程序比解釋程序快PASCAL通常是先編譯后執(zhí)行二、問(wèn)題求解題（每題5分，共計(jì)10分）1. 由四個(gè)結(jié)點(diǎn)可以構(gòu)造多少種不同的二叉樹(shù) .2. 下圖是一個(gè)設(shè)想有11項(xiàng)活動(dòng)的活動(dòng)網(wǎng)。其中有9個(gè)事件V1，V2， V9,每個(gè)事件表示在它之前的活動(dòng)已經(jīng)完成，在它之后的活動(dòng)可以開(kāi)始。V1表示整個(gè)工程的開(kāi)始，V9表示結(jié)束，與每個(gè)活動(dòng)相聯(lián)系的數(shù)ax(x=111)是執(zhí)行該活動(dòng)所需的時(shí)間（單位：天）。問(wèn)完成整項(xiàng)工程至少需要 天，影響工程進(jìn)度的關(guān)鍵活動(dòng)有哪些： 。 V2 V7V1 V5 V9 V3 V8 V4 V6三、程序閱讀理解題 （每題8分，共計(jì)32分）1program ex11_8;varn,

10、i,j,k,p:longint;beginwrite('N=12'); i:=2;j:=0;k:=1;repeatinc(i);p:=j+k;j:=k;k:=p;until i=12;writeln('F(',12,')=',p);end.運(yùn)行結(jié)果為： 2program example;varn:byte;a:array1.100 of longint;function f(n:byte):longint;var i:longint;beginif an-1>0 

11、;then i:=an-1else i:=f(n-1);if an-2>0 then i:=i+an-2else i:=i+f(n-2);an:=i;f:=i;end;beginfillchar(a,sizeof(a),0);a1:=1;a2:=1;writeln('F(',8,')=',f(8);end.運(yùn)行結(jié)果為: 3program example3begin a1:=1;t:=0;for i:=2 to 6 do begins:=0;for j:=1 to i-1 do s:=s+aj; a

12、i:=s+1; end;for i:=1 to 6 do t:=t+ai;writeln(t=,t);end.運(yùn)行結(jié)果為： 4program example4var i,s,max:integer;begin for i:=1 to 10 do read(ai); max:=a1; s:=a1; for i:=2 to 10 dobegin if s<0 then s:=0; s:=s+ai; if s>max then max:=s;end;writeln(max=,max);end.輸入：8 9 1 24 6 5 11 15 28 9運(yùn)行結(jié)果為： 四、程序完善題 (每題14分，

13、共計(jì)28分)1.n×n方陣的每行每列都是自然數(shù)1.n的一個(gè)全排列，每行（列）無(wú)重復(fù)數(shù)字。例： n5時(shí)，     1 4 3 2 5      5 3 2 1 4      4 2 1 5 3      3 1 5

14、0;4 2      2 5 4 3 1輸入 n（>2）和第一行數(shù)字（不檢查錯(cuò)誤）輸出 一個(gè)滿足要求的方陣因?yàn)橹皇且竺啃校校o(wú)重復(fù)數(shù)字，對(duì)第一行的每個(gè)數(shù)字，都四十五度斜向下寫(xiě)，寫(xiě)到行盡頭就從行開(kāi)頭開(kāi)始。這樣就不會(huì)重復(fù)。對(duì)于經(jīng)過(guò)第y行，第x列的直線，斜率k=1設(shè)：y=x+b代入坐標(biāo)，得出：b=y-x令y=1，取首行的數(shù)：x=y-bx從1開(kāi)始，到n,如果x為0或負(fù)數(shù)，則x=x+n，取出第一行的數(shù)。程序只用一維數(shù)組，存第一行的數(shù)字。program ex

15、ample2;const    maxn=10000;var     a:array1.maxn of integer;     x,y,n:integer;function f(x,y:integer):integer;var   b:integer;begin     (1)     (2)   

16、0; if x<=0 then  (3)     f:=ax;end;begin    write('Enter n:');  readln(n);    if (n<2) or (n>maxn) then exit;    write('Enter first

17、60;line:');    for x:=1 to n do read(ax);    writeln('Output:');    for x:=1 to n do write(ax:4);    writeln;    for y:=2 to

18、0;n do      begin         for x:=1 to n do write( (4) :4);         writeln;      end;end.2程序說(shuō)明 設(shè)有個(gè)人依次圍成一圈，從第個(gè)人開(kāi)始報(bào)數(shù)，數(shù)到第個(gè)人

19、出列，然后從出列的下一個(gè)人開(kāi)始報(bào)數(shù)，數(shù)到第個(gè)人又出列，如此反復(fù)到所有的人全部出列為止。設(shè)個(gè)人的編號(hào)分別為1，2，n，打印出出列的順序。本題用數(shù)組建立標(biāo)志位等方法求解,用數(shù)組實(shí)現(xiàn)鏈?zhǔn)浇Y(jié)構(gòu)。 數(shù)組ai作為"指針"變量來(lái)使用，ai存放下一個(gè)結(jié)點(diǎn)的位置。設(shè)立指針j指向當(dāng)前結(jié)點(diǎn)，則移動(dòng)結(jié)點(diǎn)過(guò)程為j:=aj，當(dāng)數(shù)到m時(shí)，m結(jié)點(diǎn)出鏈，則aj:=aaj。程序program example;const n=14;m=4; var a:array1.n of integer;i,j,k,p:integer;beginfor i:=1&

20、#160;to n-1 do ai:=i+1; an:=1; (1) ;k:=1;p:=0; repeat (2) ;k:=k+1;if k=m then  beginwrite(aj:4);p:=p+1; (3) ; (4) ;enduntil p=n;end.信息學(xué)初賽模擬試題（六）（中學(xué)組PASCAL語(yǔ)言，兩小時(shí)完成）請(qǐng)將正確答案在答卷上填寫(xiě)，在本試題卷上答題無(wú)效一、選擇題：（本題共20小題，115小題為單選題，1620小題為不定項(xiàng)選擇題，只有選對(duì)才有分。每題1.5分，共30分）1微型計(jì)算機(jī)的性能主要取決于( )。A.

21、 內(nèi)存 B. 中央處理器 C. 硬盤(pán) D. 顯示卡 E. 聲音卡2字長(zhǎng)為32位的計(jì)算機(jī)是指( )。A該計(jì)算機(jī)能夠處理的最大數(shù)不超過(guò)32 B該計(jì)算機(jī)中的CPU可以同時(shí)處理32位的二進(jìn)制信息C該計(jì)算機(jī)的內(nèi)存量為32MBD該計(jì)算機(jī)每秒鐘所能執(zhí)行的指令條數(shù)為32MIPSE該計(jì)算機(jī)的硬盤(pán)轉(zhuǎn)速是32轉(zhuǎn) 3MSDOS文件系統(tǒng)目錄的組織形式屬于( )。 A關(guān)系型結(jié)構(gòu) B網(wǎng)絡(luò)型結(jié)構(gòu) C樹(shù)型結(jié)構(gòu) D直線型結(jié)構(gòu) E星型結(jié)構(gòu)4Windows應(yīng)用環(huán)境中鼠標(biāo)的拖動(dòng)操作不能完成的是( )。 A當(dāng)窗口不是最大時(shí)，可以移動(dòng)窗口的位置B當(dāng)窗口最大時(shí)，可以將窗口縮小成圖標(biāo)C當(dāng)窗口有滾動(dòng)條時(shí)可以實(shí)現(xiàn)窗口內(nèi)容的滾動(dòng)D可以將一個(gè)文件移動(dòng)

22、(或復(fù)制)到另一個(gè)目錄中去 E調(diào)整任務(wù)欄的大小和位置5下面關(guān)于PASCAL語(yǔ)言的幾種說(shuō)法中，正確的是( )。 A它是一種高級(jí)語(yǔ)言 B它是一種匯編語(yǔ)言 C它是一種低級(jí)語(yǔ)言 D它是一種機(jī)器語(yǔ)言 E它不是一種過(guò)程化語(yǔ)言6下列敘述中正確的是( )。 A計(jì)算機(jī)病毒只能傳染給可執(zhí)行文件 B計(jì)算機(jī)軟件是指存儲(chǔ)在軟盤(pán)中的程序 C計(jì)算機(jī)每次啟動(dòng)的過(guò)程之所以相同，是因?yàn)镽AM 中的所有信息在關(guān)機(jī)后不會(huì)丟失 D硬盤(pán)雖然裝在主機(jī)箱內(nèi)，但它屬于外存 EROM是隨機(jī)存儲(chǔ)器7多媒體計(jì)算機(jī)系統(tǒng)的兩大組成部分是( )。多媒體功能卡和多媒體主機(jī) 多媒體通信軟件和多媒體開(kāi)發(fā)工具 C. 多媒體輸入設(shè)備和多媒體輸出設(shè)備 D. 多媒體計(jì)

23、算機(jī)硬件系統(tǒng)和多媒體計(jì)算機(jī)軟件系統(tǒng) E. 多媒體主機(jī)和多媒體信息8用WORD編輯文檔后并存儲(chǔ)在文件中，該文件的文件名缺省后綴名為( )A. *.txt B. *.bmp C. *.exe D. *.doc E. *.com9要在WINDOWS標(biāo)準(zhǔn)窗口的下拉菜單中選擇命令，下列操作錯(cuò)誤的是( )。用鼠標(biāo)單擊該命令選項(xiàng) 用鍵盤(pán)上的上下方向鍵將高亮度條移至該命令選項(xiàng)后再按回車鍵 同時(shí)按下CTRL鍵與該命令選項(xiàng)后括號(hào)中帶有下劃線的字母鍵 直接按該命令選項(xiàng)后面括號(hào)中帶有下劃線的字母鍵 同時(shí)按下ALT鍵與該命令選項(xiàng)后括號(hào)中帶有下劃線的字母鍵10十進(jìn)制數(shù)397的十六進(jìn)制值為（ ）。A. 18D B. 18E

24、 C. 277 D. 361 E.8（以下為不定項(xiàng)選題）11下列電子郵件地址中正確的是（其中表示空格）( )。A. Malin& B. malin C. LinMa& D. LinMa E. MALIN12與二進(jìn)制小數(shù)0.1等值的十六進(jìn)制小數(shù)為（ ）。A. 0.1 B. 0.2 C. 0.4 D. 0.8 E.713關(guān)于計(jì)算機(jī)網(wǎng)絡(luò)，正確的說(shuō)法是（ ）。 A調(diào)制解調(diào)器(Modem)是局域網(wǎng)絡(luò)設(shè)備 B集線器(HuB)是局域網(wǎng)絡(luò)設(shè)備 C網(wǎng)卡(NIC)是局域網(wǎng)絡(luò)設(shè)備 D中繼器（Repeater）是局域網(wǎng)絡(luò)設(shè)備E為了使用Internet網(wǎng)提供的服務(wù)，必須采用TCP/IP協(xié)議14結(jié)構(gòu)化程序

25、的結(jié)構(gòu)由哪三種基本結(jié)構(gòu)組成（ ）A. 順序結(jié)構(gòu) B. 輸入輸出結(jié)構(gòu) C. 分支結(jié)構(gòu) D. 循環(huán)結(jié)構(gòu) E.倒序結(jié)構(gòu) 15下列屬于外存儲(chǔ)器的有( ) A. 硬盤(pán) B. 軟盤(pán) C. 光盤(pán) D. MO碟 E. U盤(pán) 16在待排序文件已基本有序的前提下，下述排序方法中效率最高的是（ ）。 A. 插入排序 B. 選擇排序 C. 快速排序 D. 合并排序 E. 冒泡排序17在Excel中，數(shù)據(jù)的處理包括（ ）等A"排序" B"篩選"C"分類匯總" D以上都正確 E以上都不正確18已知數(shù)組A中，每個(gè)元素AI,J在存貯時(shí)要占4個(gè)字節(jié)，設(shè)I從1變化到7，

26、J從1變化到10，分配內(nèi)存時(shí)是從地址S開(kāi)始連續(xù)按行存貯分配的。試問(wèn)：A4,8的起始地址為（ ）AS+148 BS+120 CS+128 DS+124 ES+14419. 某數(shù)列有1000個(gè)各不相同的單元，由低至高按序排列；現(xiàn)要對(duì)該數(shù)列進(jìn)行二分法檢索（binary search），在最壞的情況下，需檢視（ ）個(gè)單元A. 1000 B. 10 C. 100 D. 500 E.25020設(shè)循環(huán)隊(duì)列中數(shù)組的下標(biāo)范圍是1m，其頭尾指針?lè)謩e為f和r，則其元素個(gè)數(shù)為 ( )。Ar-f Br-f+1 C(r-f+1) MOD m D(r-f+m) MOD m E(r-f+1)MODm二、問(wèn)題求解：（每題5分,

27、共10分）1. 已知，按中序遍歷二叉樹(shù)的結(jié)果為：#$問(wèn)：有多少種不同形態(tài)的二叉樹(shù)可以得到這一遍歷結(jié)果，并畫(huà)出這些二叉樹(shù)。 2.有2×n的一個(gè)長(zhǎng)方形方格，用一個(gè)1×2的骨牌鋪滿方格。例如n=3時(shí)，為2×3方格。此時(shí)用一個(gè)1×2的骨牌鋪滿方格，共有3種鋪法 試對(duì)給出的任意一個(gè)n(n)0)，求出鋪法總數(shù)的遞推公式。 三、寫(xiě)出程序的運(yùn)行結(jié)果：（每小題8分，共32分）PROGRAM EXP1VAR I,S,MAX:INTEGER; A:ARRAY1.10 OF INTEGER;BEGINFOR I:=1 TO 10 DO READ(AI);MAX:=A1;S:=A

28、1;FOR I:=2 TO 10 DO BEGIN IF S<0 THEN S:=0; S:= S+AI; IF S>MAX THEN MAX:=S; END;WRITELN(MAX=,MAX)END.輸入：-1 16 24 6 7 8 18 -6 15 34輸出：2PROGRAM EXP2 VAR I,J,L,N,K,S,T: INTEGER;B: ARRAY1.10 OF 0.9; BEGINREADLN(L,N);S:=L;K:=1;T:=L; WHILE S<N DO BEGIN K:=K+1;T:=T*L; S:=S+TEND;S:=S-T; N:=N-S-1;FO

29、R I:=1 TO 10 DOBI:=0; J:=11; WHILE N>0 DOBEGIN J:=J-1;BJ:=N MOD L; N:=N DIV LEND;FOR I:=10-K+1 TO 10 DO WRITE(CHR(ORD('A')+BI);END.輸入：4167輸出:3PROGRAM EXP3 VAR I,J:INTEGER; A:ARRAY1.12 OF INTEGER; PROCEDURE SW(I1,J1:INTEGER); VAR K1:INTEGER; BEGIN FOR K1:=1 TO(J1-I1+1) DIV 1 DO BEGIN AI1+K

30、1-1:=AI1+K1-1+AJ1-K1+1; AJ1-K1+1:=AI1+K1-1-AJ1-K1+1; AI1+K1-1:=AI1-K1+1-AJ1-K1+1; END; END;BEGIN J:=200; FOR I:=1 TO 12 DO BEGIN AI:=I; J:=J-I;END;SW(1,4);SW(5,10);SW(11,14);SW(1,14);FOR I:=1 TO 12 DO BEGIN IF J MOD I =1 THEN WRITE(AI:4); J:=J-AI; END;WRITELN; end.輸出：4PROGRAM EXP4(INPUT,OUTPUT); CON

31、ST N=10; VAR S,I:INTEGER; FUNCTION CO(I1:INTEGER):INTEGER; VAR J1,S1:INTEGER; BEGIN S1:=N; FOR J1:=(N-1) DOWNTO (N-I1+1) DO S1:=S1*J1 DIV (N-J1+1); CO:=S1; END; BEGIN S:=N+1; FOR I:=2 TO N DO S:=S+CO(I); WRITELN(S=,S); END.輸出：四、完善程序（共2題，每題14分，共28分） 1. 1000！尾0問(wèn)題【問(wèn)題描述】以下程序用于統(tǒng)計(jì)1000！末尾有多少個(gè)0。其中1000！=1

32、80;2´3´´1000。實(shí)際上我們只要統(tǒng)計(jì)1000！有多少個(gè)因子10。由于10=5´2，因而只需統(tǒng)計(jì)有多少個(gè)因子5和2。顯然在11000的所有數(shù)中，5的因子個(gè)數(shù)比2的因子個(gè)數(shù)少。因此，只要統(tǒng)計(jì)11000的所有數(shù)中共有多少個(gè)因子5就行了。program COUNT0;var i,j,n:integer;begin n:=0; for do begin j:=i*5; while =0 do begin j:= end; end; writeln(n:4);end.2. 高精度正整數(shù)乘法問(wèn)題 以下程序用于求任意2正整數(shù)的乘積。程序中用a，b表示這2個(gè)正整數(shù)

33、，并將它們的乘積存于數(shù)組ab中。根據(jù)數(shù)的乘法規(guī)則，將a的所有位與b的所有位從低位至高位兩兩相乘。設(shè)a的第i位與b的第j位相乘的結(jié)果為ab0，則ab0的個(gè)位應(yīng)加到乘積ab的第i+j-1位上，ab0的十位應(yīng)加到乘積ab的第i+j位上。在加的過(guò)程中也應(yīng)注意進(jìn)位。program MULTIPLY;const n=100;Type arr=array1.n of integer;var a,b:arr; ab:array1.2*nof integer; lab,la,w,lb,ab0,ab1,ab2,i,j,t:integer; procedure Init(var c:arr;var len

34、gth:integer);var i,t,m:integer; ch:Char;begin length:=0; WriteLn('Input a number:'); while (not eoln) do begin length:=length+1; read(ch); clength:= end; readln; writeln(length); WriteLn('The number is '); for i:=1 to length do Write(ci:1); Writeln; m:= for i:=1 to m do begin t:=ci; ci:=c