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

一、選擇題（（1）-（40）題每小題1分，（41）-（50）題每小題2分，共和60分）
下列各題A）、B）、C）、D）四個選項中，只有一個選項是正確的，請將正確選項涂寫在答題卡相應位置上，答在試卷上不得分。
(1) 在計算機中,一個字長的二進制位數(shù)是
A) 8 B) 16 C) 32 D) 隨CPU的型號而定
(2) 計算機網(wǎng)絡的突出優(yōu)點是
A) 速度快 B) 資源共享 C) 精度高 D) 容量大
(3) 計算機網(wǎng)絡能傳送的信息是:
A) 所有的多媒體信息 B) 只有文本信息
C) 除聲音外的所有信息 D) 文本和圖像信息
(4) 切斷計算機電源后,下列存儲器中的信息會丟失的是:
A) RAM B) ROM C) 軟盤 D) 硬盤
(5) 十進制數(shù)127轉換成二進制數(shù)是
A) 11111111 B) 01111111 C) 10000000 D) 11111110
(6) 要想打印存放在當前盤當前目錄上所有擴展名為.TXT 的文件內容, 應該使用的DOS命令為
A) DIR *.TXT>PRN B) TYPE *.TXT>PRN
C) COPY *.TXT PRN D) COPY *.TXT>PRN
(7) 將當前盤當前目錄及其子目錄中的全部文件 (總量不足1.2MB) 復制到一張空的A盤的根目錄下,應該使用的DOS命令為
A) XCOPY *.*A:\ /M B) XCOPY *.*A:\ /S
C) XCOPY *.*A:\ /P D) XCOPY *.*A:\ /A
(8) 在C盤根目錄下執(zhí)行PROMPT $p$g命令之后,DOS的提示符變?yōu)?BR>A) C:> B) C:\> C) C> D) C:\
(9) DOS命令 "COPY CON DISP"中的CON代表
A) 子目錄 B) 磁盤文件 C) 鍵盤 D) 顯示器
(10) 結構化程序設計所規(guī)定的三種基本控制結構是
A) 輸入、處理、輸出 B) 樹形、網(wǎng)形、環(huán)形
C) 順序、選擇、循環(huán) D) 主程序、子程序、函數(shù)
(11) 要把高級語言編寫的源程序轉換為目標程序,需要使用
A) 編輯程序 B) 驅動程序 C) 診斷程序 D) 編譯程序
(12) 英文小寫字母d的ASCII碼為100,英文大寫字母D的ASCII碼為
A) 50 B) 66 C) 52 D) 68
(13) Windows環(huán)境下,PrintScreen鍵的作用是
A) 復制當前窗口到剪貼板 B) 打印當前窗口的內容
C) 復制屏幕到剪貼板 D) 打印屏幕內容
(14) 在Windows環(huán)境下,為了終止應用程序的運行,應
A) 關閉該應用程序窗口 B) 最小化該應用程序窗口
C) 雙擊該應用程序窗口的標題欄 D) 將該應用程序窗口移出屏幕
(15) 下列各帶有通配符的文件名中,能代表文件XYZ.TXT的是
A) *Z.? B) X*.* C) ?Z,TXT D) ?.?
(16) 在MS-DOS環(huán)境中生成一個FORTRAN77程序的可執(zhí)行文件的順序應該是
A）編輯、連接、編譯 B）編輯、編譯、連接
C）編譯、連接、編輯 D）編譯、編輯、連接
(17) 關于編譯一個FORTRAN77源程序文件，下列說法中錯誤的是
A) 允許編譯只有一個主程序而沒有子程序的源文件
B) 允許編譯有多個子程序的源文件
C) 允許編譯只有一個子程序而沒有主程序的源文件
D) 允許編譯有多個主程序的源文件
(18) 下列關于FORTRAN77源程序編輯規(guī)則的敘述中，正確的是
A) 每一行都必須從第7列開始
B) 主程序第一行必須是PROGRAM語句
C) 每個源程序塊的最后一行必須是END語句
D) 每個子程序中必須有一個RETURN語句
(19) 在FORTRAN77源程序中，續(xù)行標志符必須放在
A) 第1列 B) 第1-6列 C) 第6列 D) 第5列
(20) 下列關于"SUBROUTINE MAP(X，Y)"語句行的敘述中，不正確的是
A) 這是子程序的第一個語句 B) 字符串"MAP"是子程序名
C) 變量X是子程序的形參 D) 子程序執(zhí)行后，MAP將返回整型數(shù)據(jù)
(21) FORTRAN77表達式"2/4+0.5"的值是
A) 0.5 B) 1 C) 1.0 D) 0
(22) 若在FORTRAN77中一個整型變量占2個字節(jié)，則該變量可以存放的數(shù)據(jù)值范圍是
A) -32768～32767 B) -32768～32768
C) -65536～65535 D) -65536～65536
(23) 閱讀下列FORTRAN77程序：
PI=3.14159265
WRITE(*,'(F7.4) ')PI
END
程序運行后輸出結果是
A) 3.142 B) 3.1415 C) 0.31416 D) 3.1416
(24) 圓的直徑存放在整型變量K之中，下列計算圓面積的表達式中正確的是
A) 3.1415926*K*K/4 B) 3.1415926*(K*K/4)
C) 3.1415926*(K/2)**2 D) 3.1415926*(K/2)*(K/2)
(25) 要判斷"月收入M在2000元以上(含2000元)且5000元以下)不含5000元)"的職工，應該使用的邏輯表達式是
A) M .GE. 2000 .AND. M .LE. 5000
B) M .GE. 2000 .OR. M .LE. 5000
C) M .GE. 2000 .AND. M .LT. 5000
D) M .GE. 2000 .OR. M .LT. 5000
(26) 設FORTRAN77子程序如下：
SUBROUTINE SUB(I，X)
B=I+1
X=X+B
END
若主程序中的變量M，B已按I-N規(guī)則賦值，則調用上述子程序的語句中正確的是
A) CALL SUB(M，M) B) CALL SUB(M+4，B)
C) CALL SUB(B，B) D) CALL SUB(M，B+4)
(27) 下列不是FORTRAN77常量的是
A) (3.0,4.0) B) 3.1416D+00 C) 2/3 D) 'Very good!'
(28) 閱讀下列FORTRAN77程序：
F=1.0
DO 20 K=3, 7, 3
DO 20 L=K-1, K
20 WRTTE(*,'(I3, F8.1)'K, F*K
END
程序運行結果的最后一行是
A) 3 6.0 B) 6 6.0 C) 6 180.0 D) 7 180.0
(29) 在FORTRAN77中，下列運算符的優(yōu)先順序是
A) 邏輯運算，關系運算，算術運算 B) 關系運算，邏輯運算，算術運算
C) 算術運算，關系運算，邏輯運算 D) 關系運算，算術運算，邏輯運算
(30) 使用FORTRAN77內部函數(shù)時，所給的自變量
A) 只能是常量 B) 只能是變量
C) 只能是常量或者變量 D) 可以是常量、變量或者表達式
(31) 設X=2.0, Y=8.0, Z=6.0, L=.TRUE.,則下列FORTRAN77表達式中值為.TRUE.的是
A) X+Z.GT.Y.AND.L B) .NOT.(Y.LT.Z+X).NEQV..NOT.L
C) .NOT.L.OR.(L.EQV.Y+X.EQ.Z) D) Y+X.GE.Z+X.AND.(L.AND..FALSE.)
(32) 下列輸出語句行中正確的是
A) WRITE(*，*)(A(K，L)，K=1，3，L=1，3)
B) WRITE(*，*)A(K，L)，K=1，3，L=1，3
C) WRITE(*，*)((A(K，L)，K=1，3，)L=1，3)
D) WRITE(*，*)(A(K，L)，K=1，3)，L=1，3
(33) 給定下列FORTRAN77子程序如下：
SUBROUTINE SUB(K，A)
A=SQRT(K*K+1.0)
END
下列調用語句中正確的是
A) CALL SUB(N,N) B) CALL SUB(X,X)
C) CALL SUB(N,X*X) D) CALL SUB(11,X)
(34) 閱讀下列FORTRAN77程序:
INTEGER AA(2,3)
DATA AA/1,2,3,4,6/
CALL S2D19(AA)
CALL S2D19(AA(1,2))
END
SUBROUTINE S2D19(BB)
INTEGER BB(2,2)
WRITE(*,'(1X,2I3)') BB(1,1),BB(2,2)
END
程序運行結果是
A) 1 4 B) 1 5 C) 1 4 D) 1 2
3 6 2 6 2 5 3 4
(35) 閱讀下列FORTRAN77程序:
INTEGER A(3,3)
DO 10 K=1,3
DO 10 L=1,3
10 A(K,L)=K*10+L
WRITE(*,'(1X,3I3)')A
END
程序運行結果是:
A) 11 21 31 B) 11 12 13 C) 31 32 33 D) 33 32 31
12 22 32 21 22 23 21 22 23 32 22 21
13 23 33 31 32 33 11 12 13 31 21 11
(36) 閱讀下列FORTRAN77程序:
WRITE(*,10)'YEAR:', 1996
10 FORMAT(/3X,A,I4)
END
程序運行結果是(^代表空格,下同)
A) ^^^^^YEAR:1996 B) ^^YEAR:1996
C) 空白行 D) 空白行
^^^^^YEAR:1996 ^^YEAR:1996
(37) 某函數(shù)子程序中使用了IMPLICIT、READ、COMPLEX和FUNCTION四種語句,其中屬于可執(zhí)行語句的是:
A) FUNCTION B) READ C) COMPLEX D) IMPLICIT
(38) 要想成功地打開名為"QW"的輸出文件,應該使用語句
A) OPEN(UNIT=3,FILE='QW')
B) OPEN(3,FILE=QW)
C) OPEN(FILE='QW',3,STATUS='OLD')
D) OPEN(3,FILE=QW,STATUS=UNKNOWN)
(39) 閱讀下列FORTRAN77程序:
INTEGER F
F(X,Y)=X+Y
A=-2.5
B=4.0
B=1.0+F(A,B)
WRITE(*,20)B
20 FORMAT(1X,F4.1)
END
程序運行的結果是:
A) 2.0 B) -1.5 C) -1.0 D) 3.0
(40) 閱讀下列FORTRAN77程序:
X=0
DO 15 L=10, 5, 15
15 X=X+1.0
END
程序運行時執(zhí)行循環(huán)體的次數(shù)是:
A) 0 B) 1 C) 2 D) 無窮
(41) 閱讀下列FORTRAN77程序:
DIMENSION M(4,4)
DATA M/1,2,3,4,5,6,7,8,9，0,1,2,3,4,5,6/
DO 10 I=1,4
WRITE (*,100)(M(I,J),J=1,I)
10 CONTINUE
100 FORMAT(1X,4I2)
END
程序運行的結果是
A) 1 2 3 4 B) 1 5 9 3 C) 1 D) 1
6 7 8 6 0 4 2 6 5 6
1 2 1 5 3 7 1 9 0 1
6 6 4 8 2 6 3 4 5 6
(42) 閱讀下列FORTRAN77程序:
CHARACTER*10 A, B*6
DO 10 I=1,10
A(I:I)=' '
10 COUNTINUE
A(1:5)='ABCDE'
B='FGHIJK'
A(4:9)=B
WRITE(*,100) A
100 FORMAT(1X,A)
END
程序運行結果是：
A) ABCDEFGHIJ B) ABCDEGHIJK C) ABCFGHIJK D) BCDEFGHIJK
(43) 閱讀下列FORTRAN77程序：
INTRINSIC SIN， COS
WRITE(*，*)FUN(SIN，30.0)/FUN(COS,30.0)
END
FUNCTION FUN(F,X)
X=X*3.14159/180
FUN=F(X)
END
程序運行結果是
A) sin30°的值 B) cos30°的值 C) tg30°的值 D) ctg30°的值
(44) 閱讀下列FORTRAN77程序：
X=0.0
Y=2.0
CALL SUB(X,Y,Z,3.0)
WRITE(*,'(1X,3F5.1)')X,Y,Z
END
SUBROUTINE SUB(A,B,X,Z)
A=A+1
B=B+2.0
Y=1.0
X=X+Y
END
程序運行結果是:
A) 2.0 5.0 4.0 B) 2.0 1.0 2.0
C) 1.0 4.0 4.0 D) 4.0 2.0 4.0
(45) 閱讀下列FORTRAN77程序:
CHARACTER A(5,5)
DO 100 K=1,5
DO 100 J=1,5
N=K*(2-K)+(J-3)*(J-3)
IF(N.LT.0)A(K,J)='$'
IF(N.EQ.0)A(K,J)='0'
IF(N.GT.0)A(K,J)='*'
100 CONTINUE
WRITE(*,200)(（A(K,J), J=1,5） K=1,5)
200 FORMAT(1X,5A2)
END
程序運行的結果是
A) $$$$$ B) ***$$ C) $$$$$ D) *****
**0** **$$$ $$0$$ **0**
*$$$* *0$$$ $***$ *$$$*
$$$$$ **$$$ ***** $$$$$
$$$$$ ***$$ ***** $$$$$
(46) 閱讀下列FORTRAN77程序:
DIMENSION N(20)
DO 10 M=1,20
N(M)=0
10 CONTINUE
K=5
DO 20 M=1,K
DO 20 J=1,K
N(J)=N(M)+1
20 CONTINUE
WRITE(*,*)N(K)
END
程序運行的結果是:
A) 8 B) 9 C) 18 D) 10
(47) 閱讀下列FORTRAN77程序:
COMMON /COM/M(5),N(4)
CALL FIB
WRITE(*,'(1X,4I3)')N
END
SUBROUTINE FIB
COMMON /COM/J(5),K(4)
DO 10 I=1,4
K(I)=J(I+1)-J(I)
10 CONTINUE
END
BLOCK DATA
COMMON /COM/K(5),L(4)
DATA K/8,7,10,4,13/
END
程序運行的結果是:
A) 1 -3 6 -9 B) 7 10 4 13
C) -1 3 -6 9 D) -9 3 -6 9
(48) 閱讀下列FORTRAN77程序:
INTEGER P(3,4)
DATA P/1,2,3,4,5,6,7,8,9,10,11,12/
CALL SUB(P)
WRITE(*,*)P(2,2)
END
SUBROUTINE SUB(A)
INTEGER A(12)
DO 10 K=1,12
M=A(K)
A(K)=A(12-K+1)
A(12-K+1)=M
10 CONTINUE
END
程序運行結果是：
A) 5 B) 6 C) 7 D) 8
(49) 閱讀下列FORTRAN77程序：
N=0
DO 10 K=30，0，-2
DO 10 L=-10，10，1
10 N=N+1
WRITE(*，*)N
END
程序運行結果是：
A) 316 B) 326 C) 306 D) 336
(50) 閱讀下列FORTRAN77程序：
COMMON A，B，C，D
A=1.0
B=2.0
C=3.0
D=4.0
CALL ABCD(2)
WRITE(*,*)A,C
END
SUBROUTINE ABCD(N)
COMMON B,C,D,A
IF(N.LE.0) THEN
B=A
C=D
ENDIF
END
程序運行結果是
A) 1.0 3.0 B) 1.0 4.0 C) 4.0 3.0 D) 4.0 2.0
二、填空題(每空2分，共40分)
請將每一個空的正確答案寫在答案卡【1】至【20】序號的橫線上，答在試卷上不得分。
(1) 為了要將當前盤目錄中的可執(zhí)行程序ABC.EXE的輸出結果存放到當前盤當前目錄中的文件OUT.TXT中,則應使用的DOS命令為【1】 。
(2) 計算機網(wǎng)絡分為廣域網(wǎng)和局域網(wǎng),因特網(wǎng)屬于【2】 。
(3) 要想在當前目錄下方便地執(zhí)行C盤\UCDOS目錄中的程序,就應該先執(zhí)行預設搜索路徑的命令,該DOS命令為【3】 。
(4) 要查看當前目錄中擴展名為.DAT的所有文件目錄,應該使用的DOS 命令為【4】 。
(5) 在Windows環(huán)境下,當進行復制操作時,其復制的內容將存放在【5】中
(6) 下列FORTRAN77子程序的功能是用以下公式計算一組數(shù)據(jù)Z1,Z2,…,Zn的標準差σ：
σ2=(Z12 +Z22+…+Zn2)/n-[(Z1+Z2,+…+Zn)/n]2
請在程序中的下劃線處填入合適的內容。
【6】 SIGMA(Z，N)
REAL Z(N)
SUMX=0.0
SUMX2=0.0
DO 10 K=1,N
【7】
SUMX=SUMX+X
SUMX2=SUMX2+X*X
10 CONTINUE
AV=SUMX/N
AV2=SUMX2/N
S2=AV2-AV*AV
SIGMA=【8】
END
(7) 下列FORTRAN77程序的功能是將30個學生的考試成績讀入數(shù)組A,然后統(tǒng)計并且輸出最高的分數(shù)以及小于60分、60～80分與大于80分的三個分數(shù)段的學生數(shù)。請在程序中的下劃線處填入合適的內容。
【9】 A(30), B, C(3)
DATA C/3*0/
READ(*,*)A
【10】
DO 10 K=2,30
IF(A(K).GT.B) B=A(K)
10 CONTINUE
DO 30 K=1,30
IF (A(K).LT.60)C(1)=C(1)+1
IF (A(K).GT.80)C(3)=C(3)+1
IF(A(K).LE.80 【11】 A(K).GE.60)C(2)=C(2)+1
30 CONTINUE
WRITE(*,*) B,C
END
(8) 下列FORTRAN77程序的功能是用對分法求出方程4.1x3-5.2x=11.8在區(qū)間(1，5)中的一個實數(shù)根，要求輸出根的近似值和對分次數(shù)。請在程序中的下劃線處填入合適的內容。
【12】 =4.4*X**3-5.2*X-11.8
DATA XL,XR,N/1.0,N/1.0,5.0,0/
10 N=N+1
X=(XL+XR)/2.0
FX=FUN(X)
IF (ABS(FX).LT.1E-6.OR.N.GE.1000)THEN
WRITE(*,'(1X,A2,F12.7,A5,I4)')'X=',X,'N=', N
ELSE
IF(FUN(XR)*FX.GE.0.0) THEN
XR=X
【13】
XL=X
ENDIF
【14】
ENDIF
END
(9) 下列FORTRAN77程序的功能是計算多項式y(tǒng)=2+2.1x+3.2x3+5.4x5 在x=1.7時的值。主程序調用了函數(shù)子程序POLY。請在程序中的下劃線處填入合適的內容。
PROGRAM PVALUE
REAL A(6)
DATA A/【15】 /
DATA N，X/6， 1.7/
Y=POLY(A,N,X)
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)
【16】
POLY=B(1)
FV=1.0
DO 10 K=2, M
FV=FV*V
10 POLY=POLY+【17】
END
(10) 下列FORTRAN77程序的功能是使用篩法篩選出N以內的所有素數(shù)并輸出。其算法如下：
在N 以內的自然數(shù)列中先篩除2的倍數(shù)(不包括2)；在2之后未篩去的第一個數(shù)是3,于是再篩除3的倍數(shù)；在3之后未篩去的第一個數(shù)是5,于是再篩除5的倍數(shù)；如此重復下去，直到遇見篩剩下的第一個數(shù)是最接近N的平方根的那個數(shù)為止。請在程序中下劃線處填入合適的內容。
PARAMETER (N=100)
【18】 A(N),P(N)
A(1)=0
DO 10 K=2,N
10 A(K)=K
DO 20 K=3,N
20 IF(MOD(A(K),2).EQ.0)A(K)=0
ISR=SQRT(FLOAT(N))
DO 30 M=3,ISR,2
DO 30 K=M+2, N
30 IF(A(K).NE.0.AND.MOD(A(K),M).EQ.0)【19】
M=1
DO 40 K=1,N
IF(A(K).NE.0)THEN
P(M)=【20】
M=M+1
ENDIF
40 CONTINUE
WRITE(*,'(1X,10I8)')(P(K),K=1,M-1)
END

--------------------------------------------------------------------------------

基礎部分和FoxBASE程序設計試題
參考答案及評分標準
一、選擇題（⑴-(40)題每題1分，(41)-(50)題每題2分，其60分）
( 1) D ( 2) B ( 3) A ( 4) A ( 5) B ( 6) C ( 7) B ( 8) B ( 9) C (10) C
(11) D (12) D (13) C (14) A (15) B (16) B (17) C (18) A (19) C (20) B
(21) C (22) A (23) D (24) D (25) B (26) D (27) B (28) D (29) A (30) C
(31) C (32) B (33) A (34) D (35) B (36) D (37) B (38) C (39) C (40) D
(41) B (42) C (43) B (44) C (45) A (46) B (47) C (48) C (49) B (50) C
二、填空題答案（每空2分，共40分）
(1) 【1】ABC >OUT.TXT 或者 ABC.EXE>OUT.TXT
(2) 【2】廣域網(wǎng)
(3) 【3】PATH C:\UCDOS 或其它等效命令
(4) 【4】DIR *.DAT 或 DIR *.DAT/P 或 DIR *.DAT/W 或帶其它參數(shù)也可
(5) 【5】剪貼板
(6) 【6】.NOT.婚姻狀況 或 !婚姻狀況
(7) 【7】INT(X/3)=X/3 或 X/3=INT(X/3)
【8】MOD(X,3)=0 或 0=MOD(X,3)
【9】ROUND(X/3,0)=X/3 或 X/3=ROUND(X/3,0)
(8) 【10】TOTAL TO SG ON 類別 FIELDS 數(shù)量, 總價
或TOTAL TO SG ON 類別 FIELDS總價, 數(shù)量
或TOTAL ON 類別FIELDS 數(shù)量, 總價TO SG
或TOTAL ON 類別FIELDS總價, 數(shù)量TO SG
只有TOTAL 給1分。
(9) 【11】.NOT.EOF() 或 !EOF()
【12】OTHERWISE 或至少包含前4個字母
【13】WITH 基本工資+獎金+津貼-扣發(fā) 注：WITH后的各項順序不限
【14】SKIP 或 SKIP 1 或 SKIP +1
(10) 【15】ACCEPT 如果寫成INPUT給1分
【16】FOUND() 或 .NOT.EOF() 或 !EOF()
【17】TO YN
(11) 【18】SUM 基本工資,獎金,津貼 TO JB,JJ,JT
或 SUM TO JB, JJ, JT基本工資,獎金,津貼
注：基本工資、獎金、津貼的順序不限，但必須與JB、JJ、JT對應。
(12) 【19】INDEX ON 崗位+職工號 TO GW_ZG
或INDEX ON 崗位+職工號 TO GW_ZG.IDX
(13) 【20】SET ORDER TO 3
〖完〗
基礎部分和FORTRAN程序設計試題
參考答案及評分標準
一、選擇題（⑴-(40)題每題1分，(41)-(50)題每題2分，其60分）
(1) D (2) B (3) A (4) A (5) B
(6) C (7) B (8) B (9) C (10) C
(11) D (12) D (13) C (14) A (15) B
(16) B (17) D (18) C (19) C (20) D
(21) A (22) A (23) D (24) A (25) C
(26) B (27) C (28) B (29) C (30) D
(31) B (32) C (33) D (34) A (35) A
(36) D (37) B (38) A (39) A (40) A
(41) C (42) C (43) C (44) C (45) D
(46) B (47) C (48) A (49) D (50) A
二、填空題答案（每空2分，共40分）
(1) 【1】ABC >OUT.TXT 或者 ABC.EXE>OUT.TXT
(2) 【2】廣域網(wǎng)
(3) 【3】PATH C:\UCDOS 或其它等效命令
(4) 【4】DIR *.DAT 或 DIR *.DAT/P 或 DIR *.DAT/W 或帶其它參數(shù)也可
(5) 【5】剪貼板
(6) 【6】FUNCTION
【7】X＝Z(K)
【8】SQRT(S2)
(7) 【9】 INTEGER或者REAL
【10】 B=A(1)
【11】.AND.
(8) 【12】FUN(X)
【13】ELSE
【14】 GOTO 10
(9) 【15】 2.0, 2.1 0.0，3.2， 0.0，5.4
（注：順序不可顛倒，小數(shù)點前后的0可以省略其中的一個。）
【16】DIMENSION B(M) 或者 REAL B(M)
【17】 B(K)*FV 或者 FV*B(K)
(10) 【18】INTEGER
【19】A(K)=0 或者 A(K)=0.0
【20】A(K)