全国计算机VFP二级笔试文档格式.docx

全国计算机VFP二级笔试文档格式.docx

《全国计算机VFP二级笔试文档格式.docx》由会员分享，可在线阅读，更多相关《全国计算机VFP二级笔试文档格式.docx（11页珍藏版）》请在冰豆网上搜索。

A）输入、处理、输出　　B）树形、网形、环形

C）顺序、选择、循环　　D）主程序、子程序、函数

（11）要把高级语言编写的源程序转换为目标程序,需要使用（D　）。

A）编辑程序　　B）驱动程序　　C）诊断程序　　D）编译程序

（12）英文小写字母d的ASCII码为100,英文大写字母D的ASCII码为（D　）。

A）50　　B）66　　C）52　　D）68

（13）Windows环境下,PrintScreen键的作用是（C）。

A）复制当前窗口到剪贴板　　　　B）打印当前窗口的内容

C）复制屏幕到剪贴板　　　　　　D）打印屏幕内容

（14）在Windows环境下,为了终止应用程序的运行,应（　A）。

A）关闭该应用程序窗口　　　　　　B）最小化该应用程序窗口

C）双击该应用程序窗口的标题栏　　D）将该应用程序窗口移出屏幕

（15）下列各带有通配符的文件名中,能代表文件XYZ.TXT的是（B　）。

A）*Z.?

　　B）X*.*　　C）?

Z,TXT　　D）?

.?

（16）在MS-DOS环境中生成一个FORTRAN77程序的可执行文件的顺序应该是（　B）。

A）编辑、连接、编译　　　B）编辑、编译、连接

C）编译、连接、编辑　　　D）编译、编辑、连接

（17）关于编译一个FORTRAN77源程序文件，下列说法中错误的是（D　）。

A）允许编译只有一个主程序而没有子程序的源文件

B）允许编译有多个子程序的源文件

C）允许编译只有一个子程序而没有主程序的源文件

D）允许编译有多个主程序的源文件

（18）下列关于FORTRAN77源程序编辑规则的叙述中，正确的是（C　）。

A）每一行都必须从第7列开始

B）主程序第一行必须是PROGRAM语句

C）每个源程序块的最后一行必须是END语句

D）每个子程序中必须有一个RETURN语句

（19）在FORTRAN77源程序中，续行标志符必须放在（C　）。

A）第1列　　B）第1-6列　　C）第6列　　D）第5列

（20）下列关于"

SUBROUTINEMAP（X，Y）"

语句行的叙述中，不正确的是（D　）。

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

MAP"

是子程序名

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

（21）FORTRAN77表达式"

2/4+0.5"

的值是（　A）。

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

（22）若在FORTRAN77中一个整型变量占2个字节，则该变量可以存放的数据值范围是（A　）。

A）-32768～32767　　B）-32768～32768

C）-65536～65535　　D）-65536～65536

（23）阅读下列FORTRAN77程序：

PI=3.14159265

WRITE（*,'

（F7.4）'

）PI

END

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

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

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

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元）"

的职工，应该使用的逻辑表达式是（C　）。

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子程序如下：

SUBROUTINESUB（I，X）

B=I+1

X=X+B

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

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

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

（27）下列不是FORTRAN77常量的是（C）。

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

Verygood!

'

（28）阅读下列FORTRAN77程序：

F=1.0

DO20K=3,7,3

DO20L=K-1,K

20WRTTE（*,'

（I3,F8.1）'

K,F*K

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

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

（29）在FORTRAN77中，下列运算符的优先顺序是（C　）。

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

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

（30）使用FORTRAN77内部函数时，所给的自变量（D　）。

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

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

（31）设X=2.0,Y=8.0,Z=6.0,L=.TRUE.,则下列FORTRAN77表达式中值为.TRUE.的是（B　）。

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）下列输出语句行中正确的是（C）。

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子程序如下：

SUBROUTINESUB（K，A）

A=SQRT（K*K+1.0）

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

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

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

（34）阅读下列FORTRAN77程序:

INTEGERAA（2,3）

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

CALLS2D19（AA）

CALLS2D19（AA（1,2））

SUBROUTINES2D19（BB）

INTEGERBB（2,2）

（1X,2I3）'

）BB（1,1）,BB（2,2）

程序运行结果是（A）。

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

　　36　　　　26　　　　25　　　　34

（35）阅读下列FORTRAN77程序:

INTEGERA（3,3）

DO10K=1,3

DO10L=1,3

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

（1X,3I3）'

）A

程序运行结果是:

（A　）。

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

122232　　　　　　212223　　　　　212223　　　　　322221

132333　　　　　　313233　　　　　111213　　　　　312111

（36）阅读下列FORTRAN77程序:

WRITE（*,10）'

YEAR:

1996

10FORMAT（/3X,A,I4）

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

A）^^^^^YEAR:

1996　　　B）^^YEAR:

1996

C）空白行　　　　　　　D）空白行

^^^^^YEAR:

1996　　　　　^^YEAR:

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

A）FUNCTION　　B）READ　　C）COMPLEX　　D）IMPLICIT

（38）要想成功地打开名为"

QW"

的输出文件,应该使用语句（A　）。

A）OPEN（UNIT=3,FILE='

QW'

）

B）OPEN（3,FILE=QW）

C）OPEN（FILE='

3,STATUS='

OLD'

D）OPEN（3,FILE=QW,STATUS=UNKNOWN）

（39）阅读下列FORTRAN77程序:

INTEGERF

F（X,Y）=X+Y

A=-2.5

B=4.0

B=1.0+F（A,B）

WRITE（*,20）B

20FORMAT（1X,F4.1）

程序运行的结果是:

（　A）。

A）2.0　　B）-1.5　　C）-1.0　　D）3.0

（40）阅读下列FORTRAN77程序:

X=0

DO15L=10,5,15

15X=X+1.0

程序运行时执行循环体的次数是:

（A　）。

A）0　　B）1　　C）2　　D）无穷

（41）阅读下列FORTRAN77程序:

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）

程序运行的结果是（C　）。

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

　　678　　　　6042　　　65　　　6

　　121　　　　　53　　　　71　　901

　　6　　　　　　　64　　　　　82　63456

（42）阅读下列FORTRAN77程序:

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）

程序运行结果是：

（　C）。

A）ABCDEFGHIJ　　B）ABCDEGHIJK　　C）ABCFGHIJK　　D）BCDEFGHIJK

（43）阅读下列FORTRAN77程序：

INTRINSICSIN，COS

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

FUNCTIONFUN（F,X）

X=X*3.14159/180

FUN=F（X）

程序运行结果是（C　）。

A）sin30°

的值　　B）cos30°

的值　　C）tg30°

的值　　D）ctg30°

的值

（44）阅读下列FORTRAN77程序：

X=0.0

Y=2.0

CALLSUB（X,Y,Z,3.0）

（1X,3F5.1）'

）X,Y,Z

SUBROUTINESUB（A,B,X,Z）

A=A+1

B=B+2.0

Y=1.0

X=X+Y

（C　）。

A）2.05.04.0　　B）2.01.02.0

C）1.04.04.0　　D）4.02.04.0

（45）阅读下列FORTRAN77程序:

CHARACTERA（5,5）

DO100K=1,5

DO100J=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）='

*'

100CONTINUE

WRITE（*,200）（（A（K,J）,J=1,5）K=1,5）

200FORMAT（1X,5A2）

程序运行的结果是（D　）。

A）$$$$$　B）***$$C）　$$$$$D）　*****

　**0**　　**$$$　　$$0$$　　**0**

　*$$$*　　*0$$$　　$***$　　*$$$*

　$$$$$　　 

**$$$　　*****　　$$$$$

　$$$$$　　***$$　　*****　　$$$$$

（46）阅读下列FORTRAN77程序:

DIMENSIONN（20）

DO10M=1,20

N（M）=0

K=5

DO20M=1,K

DO20J=1,K

N（J）=N（M）+1

20CONTINUE

WRITE（*,*）N（K）

（B　）。

A）8　　B）9　　C）18　　D）10

47）阅读下列FORTRAN77程序:

COMMON/COM/M（5）,N（4）

CALLFIB

（1X,4I3）'

）N

SUBROUTINEFIB

COMMON/COM/J（5）,K（4）

K（I）=J（I+1）-J（I）

BLOCKDATA

COMMON/COM/K（5）,L（4）

DATAK/8,7,10,4,13/

A）1-36-9　B）710413

C）-13-69　D）-93-69

（48）阅读下列FORTRAN77程序:

INTEGERP（3,4）

DATAP/1,2,3,4,5,6,7,8,9,10,11,12/

CALLSUB（P）

WRITE（*,*）P（2,2）

SUBROUTINESUB（A）

INTEGERA（12）

DO10K=1,12

M=A（K）

A（K）=A（12-K+1）

A（12-K+1）=M

（　A）。

A）5　B）6　C）7　D）8

（49）阅读下列FORTRAN77程序：

N=0

DO10K=30，0，-2

DO10L=-10，10，1

10N=N+1

WRITE（*，*）N

（D　）。

A）316　B）326　C）306　D）336

（50）阅读下列FORTRAN77程序：

COMMONA，B，C，D

A=1.0

B=2.0

C=3.0

D=4.0

CALLABCD

（2）

WRITE（*,*）A,C

SUBROUTINEABCD（N）

COMMONB,C,D,A

IF（N.LE.0）THEN

B=A

C=D

ENDIF

程序运行结果是（A　）。

A）1.03.0　B）1.04.0　C）4.03.0　D）4.02.0

二、填空题（每空2分，共40分）

　　请将每一个空的正确答案写在答案卡【1】至【20】序号的横线上，答在试卷上不得分。

（1）为了要将当前盘目录中的可执行程序ABC.EXE的输出结果存放到当前盘当前目录中的文件OUT.TXT中,则应使用的DOS命令为【1】ABC>

OUT.TXT或者ABC.EXE>

OUT.TXT。

（2）计算机网络分为广域网和局域网,因特网属于【2】广域网。

（3）要想在当前目录下方便地执行C盘\UCDOS目录中的程序,就应该先执行预设搜索路径的命令,该DOS命令为【3】。

PATHC:

\UCDOS或其它等效命令

（4）要查看当前目录中扩展名为.DAT的所有文件目录,应该使用的DOS命令为DIR*.DAT或DIR*.DAT/P或DIR*.DAT/W或带其它参数也可

（5）在Windows环境下,当进行复制操作时,其复制的内容将存放在【5】中剪贴板

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

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

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

【6】FUNCTIONSIGMA（Z，N）

REALZ（N）

SUMX=0.0

SUMX2=0.0

DO10K=1,N

【7】X＝Z（K）

SUMX=SUMX+X

SUMX2=SUMX2+X*X

AV=SUMX/N

AV2=SUMX2/N

S2=AV2-AV*AV

SIGMA=【8】SQRT（S2）

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

【9】INTEGER或者REALA（30）,B,C（3）

DATAC/3*0/

READ（*,*）A

【10】B=A

（1）

DO10K=2,30

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

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【11】.AND.A（K）.GE.60）C

（2）=C

（2）+1

30CONTINUE

WRITE（*,*）B,C

（8）

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

【12】FUN（X）=4.4*X**3-5.2*X-11.8

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

X=（XL+XR）/2.0

FX=FUN（X）

IF（ABS（FX）.LT.1E-6.OR.N.GE.1000）THEN

（1X,A2,F12.7,A5,I4）'

）'

X='

X,'

N='

N

ELSE

IF（FUN（XR）*FX.GE.0.0）THEN

XR=X

【13】ELSE

XL=X

【14】GOTO10

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

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

PROGRAMPVALUE

REALA（6）

DATAA/【15】/2.0,2.10.0，3.2，0.0，5.4

　　　　　（注：

顺序不可颠倒，小数点前后的0可以省略其中的一个。

）

DATAN，X/6，1.7/

Y=POLY（A,N,X）

（1X,A5,6F5.1）'

a（k）='

A

（1X,A2,F5.1,A6,F8.2）'

;

Y='

Y

FUNCTIONPOLY（B,M,V）

【16】DIMENSIONB（M）或者REALB（M）

POLY=B

（1）

FV=1.0

DO10K=2,M

FV=FV*V

10POLY=POLY+【17】B（K）*FV或者FV*B（K）

（10）下列FORTRAN77程序的功能是使用筛法筛选出N以内的所有素数并输出。

其算法如下：

在N以内的自然数列中先筛除2的倍数（不包括2）；

在2之后未筛去的第一个数是