计算机技术基础试题库.docx

计算机技术基础试题库.docx

《计算机技术基础试题库.docx》由会员分享，可在线阅读，更多相关《计算机技术基础试题库.docx（17页珍藏版）》请在冰豆网上搜索。

计算机技术基础试题库

一、选择题

1、下列关于"SUBROUTINEMAP（X，Y）"语句行的叙述中，不正确的是（）

A）这是子程序的第一个语句B）字符串"MAP"是子程序名

C）变量X是子程序的形参D）子程序执行后，MAP将返回整型数据

2、FORTRAN表达式"2/4+0.5"的值是（）

A）0.5B）1C）1.0D）0

3、阅读下列FORTRAN程序：

PI=3.14159265

WRITE（*,'（F7.4）'）PI

END

程序运行后输出结果是（）

A）3.142B）3.1415C）0.31416D）3.1416

4、圆的直径存放在整型变量K之中，下列计算圆面积的表达式中正确的是（）

A）3.1415926*K*K/4B）3.1415926*（K*K/4）

C）3.1415926*（K/2）**2D）3.1415926*（K/2）*（K/2）

5、要判断"月收入M在2000元以上（含2000元）且5000元以下）不含5000元）"的职工，应该使用的逻辑表达式是（）

A）M.GE.2000.AND.M.LE.5000B）M.GE.2000.OR.M.LE.5000

C）M.GE.2000.AND.M.LT.5000D）M.GE.2000.OR.M.LT.5000

6、设FORTRAN子程序如下：

SUBROUTINESUB（I，X）

B=I+1

X=X+B

END

若主程序中的变量M，B已按I-N规则赋值，则调用上述子程序的语句中正确的是（）

A）CALLSUB（M，M）B）CALLSUB（M+4，B）

C）CALLSUB（B，B）D）CALLSUB（M，B+4）

7、下列不是FORTRAN常量的是（）

A）（3.0,4.0）B）3.1416D+00C）2/3D）'Verygood!

'

8、阅读下列FORTRAN程序：

F=1.0

DO20K=3,7,3

DO20L=K-1,K

20WRTTE（*,'（I3,F8.1）'K,F*K

END

程序运行结果的最后一行是（）

A）36.0B）66.0C）6180.0D）7180.0

9、在FORTRAN中，下列运算符的优先顺序是（）

A）逻辑运算，关系运算，算术运算B）关系运算，逻辑运算，算术运算

C）算术运算，关系运算，逻辑运算D）关系运算，算术运算，逻辑运算

10、使用FORTRAN内部函数时，所给的自变量（）

A）只能是常量B）只能是变量

C）只能是常量或者变量D）可以是常量、变量或者表达式

11、设X=2.0,Y=8.0,Z=6.0,L=.TRUE.,则下列FORTRAN表达式中值为.TRUE.的是（）

A）X+Z.GT.Y.AND.LB）.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.）

12、下列输出语句行中正确的是（）

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

13、给定下列FORTRAN子程序如下：

SUBROUTINESUB（K，A）

A=SQRT（K*K+1.0）

END

下列调用语句中正确的是（）

A）CALLSUB（N,N）B）CALLSUB（X,X）

C）CALLSUB（N,X*X）D）CALLSUB（11,X）

14、阅读下列FORTRAN程序:

INTEGERAA（2,3）

DATAAA/1,2,3,4,5,6/

CALLS2D19（AA）

CALLS2D19（AA（1,2））

END

SUBROUTINES2D19（BB）

INTEGERBB（2,2）

WRITE（*,'（1X,2I3）'）BB（1,1）,BB（2,2）

END

程序运行结果是（）

A）14B）15C）14D）12

36262534

15、阅读下列FORTRAN程序:

INTEGERA（3,3）

DO10K=1,3

DO10L=1,3

10A（K,L）=K*10+L

WRITE（*,'（1X,3I3）'）A

END

程序运行结果是:

（）

A）112131B）111213C）313233D）333231

122232212223212223322221

132333313233111213312111

16、阅读下列FORTRAN程序:

WRITE（*,10）'YEAR:

',1996

10FORMAT（/3X,A,I4）

END

程序运行结果是（^代表空格,下同）（）

A）^^^^^YEAR:

1996B）^^YEAR:

1996

C）空白行D）空白行

^^^^^YEAR:

1996^^YEAR:

1996

17、某函数子程序中使用了IMPLICIT、READ、COMPLEX和FUNCTION四种语句,其中属于可执行语句的是:

（）

A）FUNCTIONB）READC）COMPLEXD）IMPLICIT

18、阅读下列FORTRAN程序:

DIMENSIONM（4,4）

DATAM/1,2,3,4,5,6,7,8,9，0,1,2,3,4,5,6/

DO10I=1,4

WRITE（*,100）（M（I,J）,J=1,I）

10CONTINUE

100FORMAT（1X,4I2）

END

程序运行的结果是（）

A）1234B）1593C）1D）1

67860426266

121537193711

6648263448266

19、阅读下列FORTRAN程序:

CHARACTER*10A,B*6

DO10I=1,10

A（I:

I）=''

10COUNTINUE

A（1:

5）='ABCDE'

B='FGHIJK'

A（4:

9）=B

WRITE（*,100）A

100FORMAT（1X,A）

END

程序运行结果是：

（）

A）ABCDEFGHIJB）ABCDEGHIJKC）ABCFGHIJKD）BCDEFGHIJK

20、阅读下列FORTRAN程序：

INTRINSICSIN，COS

WRITE（*，*）FUN（SIN，30.0）/FUN（COS,30.0）

END

FUNCTIONFUN（F,X）

X=X*3.14159/180

FUN=F（X）

END

程序运行结果是（）

A）sin30°的值B）cos30°的值C）tg30°的值D）ctg30°的值

二、填空题

1、下列FORTRAN子程序的功能是用以下公式计算一组数据Z1,Z2,…,Zn的标准差σ：

σ2=（Z12+Z22+…+Zn2）/n-[（Z1+Z2+…+Zn）/n]2

请在程序中的下划线处填入合适的内容。

【1】SIGMA（Z，N）

REALZ（N）

SUMX=0.0

SUMX2=0.0

DO10K=1,N

【2】

SUMX=SUMX+X

SUMX2=SUMX2+X*X

10CONTINUE

AV=SUMX/N

AV2=SUMX2/N

S2=AV2-AV*AV

SIGMA=【3】

END

2、下列FORTRAN程序的功能是将30个学生的考试成绩读入数组A,然后统计并且输出最高的分数以及小于60分、60～80分与大于80分的三个分数段的学生数。

请在程序中的下划线处填入合适的内容。

【4】A（30）,B,C（3）

DATAC/3*0/

READ（*,*）A

【5】

DO10K=2,30

IF（A（K）.GT.B）B=A（K）

10CONTINUE

DO30K=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【6】A（K）.GE.60）C

（2）=C

（2）+1

30CONTINUE

WRITE（*,*）B,C

END

3、下列FORTRAN程序的功能是用对分法求出方程4.1x3-5.2x=11.8在区间（1，5）中的一个实数根，要求输出根的近似值和对分次数。

请在程序中的下划线处填入合适的内容。

【7】=4.4*X**3-5.2*X-11.8

DATAXL,XR,N/1.0,5.0,0/

10N=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

【8】

XL=X

ENDIF

【9】

ENDIF

END

4、下列FORTRAN程序的功能是计算多项式y=2+2.1x+3.2x3+5.4x5在x=1.7时的值。

主程序调用了函数子程序POLY。

请在程序中的下划线处填入合适的内容。

PROGRAMPVALUE

REALA（6）

DATAA/【10】/

DATAN，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

FUNCTIONPOLY（B,M,V）

【11】

POLY=B

（1）

FV=1.0

DO10K=2,M

FV=FV*V

10POLY=POLY+【12】

END

5、下列FORTRAN程序的功能是使用筛法筛选出N以内的所有素数并输出。

其算法如下：

在N以内的自然数列中先筛除2的倍数（不包括2）；在2之后未筛去的第一个数是3,于是再筛除3的倍数；在3之后未筛去的第一个数是5,于是再筛除5的倍数；如此重复下去，直到遇见筛剩下的第一个数是最接近N的平方根的那个数为止。

请在程序中下划线处填入合适的内容。

PARAMETER（N=100）

【13】A（N）,P（