黄色在线观看视频-黄色在线免费看-黄色在线视频免费-黄色在线视频免费看-免费啪啪网-免费啪啪网站

一.選擇題:( (1)一(40) )題每題1分,共60分) >

下列各題A),B),C),D)四個選項中,只有一個選項是正確的,請將正確選項涂寫在
答題卡相應位置上,答在試卷上不得分. >

(1)微型計算機的性能主要取決于
A)內存 B)中央處理器 C)硬盤 D)顯示卡>

(2)有一個數值152,它與十六進制數6A相等,那么該數值是
A)二進制數 B)八進制數 C)十進制數 D)四進制數>

(3)使用超大規模集成電路制造的計算機應該歸屬于
A)第一代 B)第二代 C)第三代 D)第四代>

(4)已知英文字母a的ASCII代碼值是十六進制數61H,那么字母d的ASCII代碼值是
A)34H B)54H C)24H D)64H>

(5)一片存儲容量是1.44MB的軟磁盤,可以存儲大約140萬個
A)ASCII字符 B)中文字符 C)磁盤文件 D)子目錄>

(6)在MS-DOS環境中同時按下[Ctrl]和[Break]兩個鍵,其作用是
A)終止當前操作 B)暫停當前操作 C)關機 D)熱啟動>

(7)將二進制數10000001轉換為十制數應該是
A)127 B)129 C)126 D)128>

(8)磁盤處于寫保護狀態,那么磁盤中的數據
A)不能讀出,不能刪改,也不能寫入新數據
B)可以讀出,不能刪改,也不能寫入新數據
C)可以讀出,可以刪改,但不能寫入新數據
D)可以讀出,不能刪改,但可以寫入新數據>

(9)微型機啟動后,DOS提示符是C:\>,現提示符變為C:\USER>,則說明剛執行過命令
A)PROMPT B)PROMPT C)PROMPT $P$G D)CD USER>

(10)MS-DOS文件系統目錄的組織形式屬于
A)關系型結構 B)網絡型結構 C)樹型結構 D)直線型結構>

(11)應用軟件系統TH的總容量大約1MB,其主要程序文件存放在
A)XCOPY C:\TH A:\ B)XCOPY C:\TH A:\ /S
C)XCOPY C:\TH A:\ /M D)XCOPY C:\TH A:\ /P>

(12)執行COPY A.TXT+B.TXT這個DOS命令后得到的磁盤文件是
A)A.TXT B)B.TXT C)AB.TXT D)A+B.TXT>

(13)在WINDOWS中,將一個應用程序窗口最小化之后,該應用程序
A)仍在后臺運行 B)暫時停止運行
C)完全停止運行 D)出錯>

(14)CD-ROM屬于
A)感覺媒體 B)表示媒體
C)表現媒體 D)存儲媒體>

(15)在因特網(Internet)中,電子公告板的縮寫是
A)FTP B)WWW C)BBS D)E-mail >

(16)按照翻譯類型分類,FORTRAN77程序設計語言屬于
A)匯編型 B)解釋型
C)編譯型 D)解釋型兼編譯型>

(17)一個完整的FORTRAN77源程序的組成不應該
A)只有一個主程序沒有子程序
B)有一個主程序和若干子程序
C)有一個主程序和一個子程序
D)只有子程序而沒有主程序>

(18)下列關于FORTRAN77源程序編輯規則的敘述之中,正確的是
A)編輯時一行都必須從第7列開始
B)主程序第一行必須是PROGRAM語句
C)每個FORMATO語句必須具有標號
D)每個子程序中必須有一個RETURN語句>

(19)在FORTRAN77源程序中不能用作續行標志的字符是
A)0 B)X C)+ D)$>

(20)下列關于FORTRAN77源程序編輯規則的敘述之中,正確的是
A)IMPLICIT語句可以放在REAL語句行之后
B)DATA語句可以在放在緊靠END語句行之前
C)注釋行不可以放在END語句行之后
D)FORMAT語句可以放在PROGRAM語句行之前>

(21)下列FORTRAN77源程序的變量名之中,不符合規則的是
A)W B)W3 C)W─3 D)W3W>

(22)若FORTRAN77中一個INTEGER型數據占用2個字節,那么該類型的數據值范圍是
A)-2147484648 2147483647 B)-32768 32767
C)0 4294967295 D)0 65535
(23)閱讀下列程序
X=0.618
WRITE(*,'(E12.4)')X
END
程序運行后顯示結果是
A).6180 B)6.180E-01 C).0618E+01 D).6180E+00>

(24)梯形的上底為A,下底為B,高為H,計算其面積的FORTRAN77表達式中錯誤的是
A)1/2*(AB)*H B)(A+B)*H/2 C)(A+B)/2*H D)0.5*(A+B)*H>

(25)要選拔身高T>1.7米且體重W<62.5公斤的人,fortran的邏輯表達式是
a)t.ce.1.7.and.w.le.62.5 b)t.le.1.7.or.w.ge.62.5 c)t.gt.1.7.and.w.lt.62.5 d)t.gt.1.7.or.w.lt.62.5 >

(26)在fortran77的變量類型說明語句中沒有
a)real語句 b)char語句 c)integer語句 d)logical語句 >

(27)一次成功的fortran77源程序編譯操作,不能
a)同時編譯一個主程序和一個子程序 b)同時編譯幾個子程序 c)同時編譯一個主程序和幾個子程序 d)同時編譯幾個主程序 >

(28)閱讀下列程序 f=1.0 do 20,j=3,7,2 do 20,k=J-1,J 20 f=F*K write(*,'(13,f8.1)')j,f end 程序運行結果是
a)3 6.0 b)5 120.0 c)9 5040.0 d)9362880.0
(29)閱讀下列程序 character*10 w do 10 k=1,10 read(*,'(a 10)'w if (w(1:2).eq.'ab'.or.w(1:2).eq.'ab')write(*,*)'',w10 continue end 程序的功能是
a)首字符是a或b的字符串被輸出顯示 b)第一、二個字符是aa或ab的字符串被輸出顯示 c)首字符是a或b的字符串將被輸出顯示 d)第一、二個字符是aa或bb的字符串將被輸出顯示>

(30)閱讀下列程序 logical l read(*,*)a,b l=A.GT.B if(l)then x=B+2*A else x=B end if write(*,*)x end 使用鍵盤為上述程序輸入兩個初值4和3,其輸出的x值是
a)4.0 b)3.0 c)11.0 d)10.0 >

(31)閱讀下列程序 read(*,*)k write(*,100)k 100 format(15) end 程序運行時輸入初始值12345,那么顯示結果是
a)12345 b)2345 c)**** d)***** >

(32)閱讀下列程序 integer f f(x,y)=X+Y a=-2.5 b=2.1 b=B+F(A,B) write(*,'(f3.1)')b end 程序運行的結果是
a).1 b).7 c)2.1 d)1.7 >

(33)閱讀下列程序 a=3.5 call suba(a,a,a) write(*,'(f4.1)')a end subroutine suba(x,y,z) y=Y-2.0 z=Z+X end 程序運行的結果是 a)7.0 b)5.0 c)3.0 d)1.5 >

(34)閱讀下列程序 character a*4,b*5,c*4 webstripperattrwas webstripperlinkwas=http://www.chinaschool.net/reeducate/com_grade/test/two/Z+X a,b,c/','middle','small'/ write(*,20)a,b,c 20 format(1x,a2,a3,a4) end 程序運行結果是
a)bigmiddle b)*********c)bigmidsma d)bimidsmal >

(35)閱讀下列程序 n=0 do 10 k=1,3 n=N+1 m=K*N 10 continue write(*,'(1x,2i3)')m,k end 程序運行結果是
a)9 4 b)9 3 c)12 4 d) 12 3(#^) >

(36)閱讀下列程序 fun(c,d)=a*c+b/d webstripperattrwas webstripperlinkwas=http://www.chinaschool.net/reeducate/com_grade/test/two/a*c+b/d a,b/1.0-1.0/ write(*,'(f4.1)')fun(a,b)-fun(b,a) end 程序運行結果是
a)0.0 b)4.0 c)2.o d)3.o >

(37)閱讀下列程序 logical l1,l2,l3,l4,l5 webstripperattrwas webstripperlinkwas=http://www.chinaschool.net/reeducate/com_grade/test/two/a*c+b/d l1,l2,l3/3*.true./ l4=.NOT.L1.AND..NOT.L2.AND.L3 l5=.NOT.L1.OR..NOT.L2.OR.L3 write(*,*)l4,l5 end 程序運行結果是
a)t t b)t f c)f f d)f t >

(38)閱讀下列程序 read(*.500)r.w write(*.500)r.w 500 format(1x,f5.2,f5.3) end 程序運行時輸入初始值01234567899,結果顯示的是 a)*****67.899 b)12.3456.789 c)********** d)123.4567.899 >

(39)閱讀下列程序 y=-123WRITE(*,200)Y 200 format('y=',F5.1)' end 程序運行結果是
a)y=***** b)=***** c)y=-123.0 d)=-123.0 >

(40)閱讀下列程序 k(x,y)=X/Y+X a=-2.0 b=4.0 b=1.0+K(A,B) write(*,'(f4.1)')b end 程序運行結果是
a)-1.0 b)1.0 c)2.0 d)3.0 >

(41)閱讀下列程序 dimension m(3,3) data m/1,2,3,4,5,6,7,8,9/ write(*,100)(m(3,j),j=1,3) 100 format(1x,3i2) end 程序運行結果是
a)2 5 8 b)3 6 9 c)4 5 6 d)7 8 9 (42)閱讀下列程序 integer a(100),g read(*,*)n,(a(i),i=1,N) do 10 i=1,N-1 g=I do 20 j=I+1,N if(a(j).lt.a(g))then g=J endif 20 continue k=A(I) a(i)=A(G) a(g)=K 10 continue write(*,'(1x,10i2)')(a(i),i=1,N) end 程序運行時輸入的初始值是3,6,9,7,則運行結果是 a)6 7 8 b)8 7 6 c)6 8 9 d)9 8 6 (43)閱讀下列程序 i=1 m=1 10 if(i.le.3)then fact=1 do 100k=1,2*I+1 fact=FACT*K 100 continue m=M+FACT i=I+1 goto 10 write(*,'(i15)')m end 程序運行結果是 a)5040 b)5160 c)5166 d)5167 (44)閱讀下列程序 dimension s(3) webstripperattrwas webstripperlinkwas=http://www.chinaschool.net/reeducate/com_grade/test/two/I+1 s/1.0,2.0,3.0/ write(*,*)la(3,s) end function la(n,x) dimension x(n) la=0 l=2 do 20 i=1,N la=LA+X(I)/L 20 continue end 程序運行結果是 a)1.0000000 b)2.0000000 c)1 d)2 (45)閱讀下列程序 dimension n(2) do 10 i=1,2 n(i)=0 10 continue k=2 do 20 i=1,K do 30 j=1,K n(j)=N(I)+1 30 continue 20 continue write(*,100),n(2) 100 format(i3,i3) end 程序運行結果是 a)2 3 b)3 3 c)2 2 d)3 2 (46)閱讀下列程序 write(*,*)'input a,b,h(cm)' read(*,100)a,b,h s=(A+B)*H/2 s=INT(S*10+0.5)/10 write(*,200)s 100 format(3f4.2) 200 format(1x,'s=',F6.2)' end 程序運行時輸入初始值246035701240,輸出結果是 a)s=373.86 b)s=373.90 c)s=****** d)s=3738600.00 (47)閱讀下列程序 integer a(3,3) data a/9,8,7,6,5,4,3,2,1/ write(*,10)((a(m,n),n=1,M=1,3) 10 format(i2/,2i2/,3i2) end 程序運行結果是 a)9 6 3 b)9 8 7 c)9 d)9 5 2 5 4 8 5 6 5 1 1 7 4 1 3 2 1 (48)點p在直角坐標系中的橫坐標u=-3.5,縱坐標V=1.8,使用下列FORTRAN77程序計算射 線op與x軸正向的夾角度數.o是坐標原點. pk=45/ATAN(1.O) u=-3.5 v=1.8 write(*,*) *pk,'(deg)' end 在輸出語句write(*,*)與*pk,'(deg.)'之間的空白處應該添加的是 a)atan2(u/v) b)atan2(u,v) c)atan2(v/u) d)atan2(v,u) (49)閱讀下列程序 n=0 do 10 k=50,0,-2 do 10 l=-100,100,1 10 n=N+1 write(*,*)n end 程序運行結果是 a)5000 b)5026 c)5200 d)5226 (50)閱讀下列程序 character*4 a,b,c*5 webstripperattrwas webstripperlinkwas=http://www.chinaschool.net/reeducate/com_grade/test/two/N+1 a,b,c/'your','boys','girls'/ write(*,'(1x,a4,a5,a6,a1)')a,b,c,'!' end 程序運行結果是 a)yourboysgirls! b)your凵boys凵girls! c)your凵boysgirls! d)yourboys凵girls! 二.填空題:(每空2分,共40分) 請將每空的答案寫在答題卡__1__至__20__序號的橫線上.答在試卷上不得分. (1)dos中的自動批處理文件的全名是__1__. (2)在dos啟動盤中,除connand.com外,還有兩個必備的系統文件,它們是msdos,sys (或ibmdos.com)與__2__. (3)在dos下,要將當前目錄中ab.txt文件設置為只讀屬性,應該使用的完整命令行是 __3__. (4)在dos下,要查看當前目錄中所有批處理文件的總字節數,應該使用的完整命令行 是__4__. (5)計算機病毒除有破壞性,潛伏性激發性外,還有一個最明顯的特性是__5__. (6)閱讀下列程序.其功能是求出方程2x3-3x2+4x-11=0在區間(1,5)中的一個實數根, 運行結果是顯示根值和對分次數.使用的是二分算法. 請在其中______處填入適當的內容. fun(x)=2.0*X**3-3.0*X**2+4.0*X-11.0 data xl,xr,n/1.o,5.0,0/ 10 continue __6__ x=(XL+XR)/2.0 __7__ if(abs(fx).lt.1e-6 .or.n.ge.1000)then write(*,'(1x,a2,f12.7,a5,14)')'x=',X,' n=',N' else if(fun(__8__)*fx.ge.0.0)then xr=X else xl=X endif goto 10 endif end (7)閱讀下列程序.其功能是計算y=1+1.1X+1.2X2+1.3X3+1.4X4+1.5X5當X=3.1時的 值.主程序調用了函數子程序. 請在其中____處填入適當的內容. program pvalue __9__ data a/1.0,1.1,1.2,1.3,1.4,1.5/,n,x/6,3.1/ __10__ write(*,'(1x,a5,6f5.1)')'a(k)=',A' write(*,'(1x,a2,f5.1,a6,f8.2)')'x=',X,' ; y=',Y' end function poly(b,m,v) dimension b(m) poly=B(1) fv=1.0 do 10k=2,M fv=FV*V 10 __11__=POLY+B(K)*FV end (8)函數子程序dtoh能夠將一個十進制正整數dec轉換為一個表示十六進制數的字符 字符串,其長度不超過8.例如127轉換為'7f'. 算法是:將dec除16取余,將所得的商再除16取余,如此反復,直到商和零為止,最后按 照逆序輸出所得的各個余數. 請在其中____處填入適當的內容. character*8 function dtoh(dec) integer dec,r,pos pos=9 dtoh='' 111 continue __12__ if(pos.ge.1)then r=MOD(DEC,16) if(r.lt.1o)then __13__=CHAR(ICHAR('0')+R ) else dtoh(pos:pos)=CHAR(ICHAR('A')+R-10) else dtoh='**********' goto999 endif dec=DEC/16 if(__14__)goto 111 999 continue end program dechex character*8 dtoh wrete(*,*) dtoh(127) end (9)有一個十進制的四位數abcd與一個十進制的三位數cdc的差等于十進制的三位數abc. 下列程序按"abcd=9876"的樣式打印出ABCD這個數. 請在其中____外填入適當的內容. integer a,b,c,d do 10 a=1,9 do 10 b=0,9 do 10 c=1,9 __15__ l=1000*A+100*B+10*C+D m=100*C+10*D+C n=100*B+C if(__16__)write(*,'(__17__)')'xabcd=',A,B,C,D' 10 continue end (10)閱讀下列程序.其功能是使用篩法選出n以內的所有素數并顯示. 算法:在n以內的自然數列中先篩除2的倍數;在2之后篩乘下的第一個數是3,于是再篩 除3的倍數;在3之后篩剩下的第一個數是5,于是再篩除5的倍數;如此重復下去,直到遇見 篩剩下的第一個數是最接近n的平方根的那個數為止. 請在其中____處填入適當的內容. program prines parameter (n=100) integer a(n),p(n) do 10 k=1,N 10 a(k)=K do 20 k=3,N 20 if(__18__.eq.0)a(k)=0 isr=SQRT(REAL(N)) do 30m=3,ISR,2 do 30k=M+2,N 30 if(a(k).ne.0.and.mod(a(k),m).eq.0)a(k)=0 m=1 do 40k=2.N if(a(k).ne.0)then __19__ m=M+1 endif 40 continue write(*,'(1x,1018)')(p(k),__20__) end 1999年4月 全國計算機等級考試二級筆試試卷 基礎知識和fortran語言程序設計 答案及評分標準 一.選擇題((1)～(40)題每題1分,(41)～(50)題每題2分,共60分) (1)b (2)b (3)d (4)d (5)a (6)a (7)b (8)b (9)d (10)c (11)b (12)a (13)a (14)d (15)c (16)c (17)d (18)c (19)a (20)b (21)c (22)b (23)d (24)a (25)c (26)b (27)d (28)c (29)b (30)c (31)b (32)a (33)c (34)d (35)a (36)b (37)d (38)c (39)b (40)b (41)b (42)c (43)d (44)d (45)b (46)b (47)c (48)d (49)d (50)b 二.填空題(每空2分,共40分)(所有字母都允許大,小寫或大小寫混合) (1)__1__autoexec.bat (2)__2__io.sys或ibmbio.com (3)__3__attrib ab.txt +r ab.txt (4)__4__dir *.bat或dir *.bat/p或dir *.bat/w或dir *.bat/p/w 或dir *.bat/w/p (5)__5__傳染性或傳播性 (6)__6__n=N+1或N=1+N __7__fx=FUN(X) __8__xr (7)__9__dimension a(6)或repl a(6) __10__y=POLY(A,N,X) __11__poly (8)__12__pos=POS-1 __13__dtoh(pos:pos) __14__dec.ne.0或dec.gt.0 (9)__15__do 10 d=0,9或DO 10,d=0,9 __16__l-m.eq.n或(l-m).eq.n __17__a6.411 (10)__18__mod(a(k),2) __19__p(m)=A(K) __20__k=1,M-1 >