二级笔试试题BASI1文档格式.docx

二级笔试试题BASI1文档格式.docx

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

D）COPYX1.TXT+B1.TXTB:

Z.TXT

（10）下列四组DOS命令中，功能等价的一组是

*.*B:

与DISKCOPYA:

B:

B）COPYABC.TXT+XYZ.TXT与TYPEXYZ.TXTABC.TXT

C）COPYABC.TXT+XYZ.TXT与COPYXYZ.TXT+ABC.TXT

D）TYPE*.FORCON与COPY*.FORCON

（11）设当前目录为D:

\BB,现要把D:

\AA目录下首字符是A的文本文件全部删除，

应该使用命令

A）DELA*.TXTB）DEL\AA\A.TXT

C）DEL\AA\A*.TXTD）DEL\AA\A?

.TXT

（12）在Windows中，启动应用程序的正确方法是

A）用鼠标指向该应用程序图标

B）将该应用程序窗口最小化成图标

B）将该应用程序窗口还原

D）用鼠标双击该应用程序图标

（13）在Windows中，终止应用程序执行的正确方法是

A）将该应用程序窗口最小化成图标

B）用鼠标双击应用程序窗口右上角的还原按钮

C）用鼠标双击应用程序窗口中的标题栏

D）用鼠标双击应用程序窗口左上角的控制菜单框

（14）在微机系统中，对输入输出设备进行管理的基本程序模块（BIOS）存放在

A）RAM中B）ROM中C）硬盘中D）寄存器中

（15）使计算机病毒传播范围最广的媒介是

A）硬磁盘B）软磁盘C）内部存储器D）互联网

（16）在QBASIC的编辑环境中,用Copy复制串后,可以粘贴该串的命令是

A）Ctrl+VB）PasteC）CutD）Alt+F

（17）在QBASIC中,常量987654.987654#的数据类型是

A）整型B）实型C）双精度型D）长整型

（18）在下列四个QBASIC表达式中,非法的表达式是

A）a=b+cB）a=（b=c）

C）a+bcD）a$b+c+10

（19）QBASIC表达式（LOG

（1）+ABS（-1）+INT（RND

（1））的值是

A）-1B）1C）0D）2

（20）在QBASIC中表达式EXP（-8）+SIN（-8）+SQR（8）的类型是

A）算术表达式B）关系表达式C）错误的表达式D）逻辑表达式

（21）在QBASIC中，下面的四个语句中存在非法调用错误的是

A）x=SGN（0）B）x=FIX（0）C）x=LOG（0）D）x=ABS（0）

（22）定义有10个单精度实型数的数组,正确的语句是

A）DIMa（9）ASSINGLEB）OPTIONBASE1:

DIMa（9）

C）DIMa#（10）D）DIMa（10）ASSINGLE

（23）下面四个语句中,能打印显示20*30字样的是

A）PRINT"

20*30"

B）PRINT20*30

C）PRINTCHR$（20）+"

*"

+CHR$（30）

D）PRINTVAL（"

20"

）*VAL（"

30"

）

（24）下面四个语句中,正确的单行自定义函数语句是

A）fna（x,y）=a*x+b*y

B）DEFfna（x,y）=a*x+b*yENDDEF

C）DEFfna（x,y）=a*x+b*yEND

D）DEFfna（x,y）=a*x+b*y

（25）要使变量x赋值为1到100间（含1,不含100）的一个随机整数,正面语句正确的是

A）x=INT（100*RND）B）x=INT（101*RND）

C）x=1+INT（100*RND）D）x=1+INT（99*RND）

（26）有如下一组程序语句

DIMsumASINTEGER

sum%=19

sum=2.32

PRINTsum%;

sum

运行后的输出结果是

A）192.32B）1919C）2.322.32D）22

（27）有如下一组程序语句

DEFSTRC-F

c$="

123"

d="

456"

PRINTc+d$

A）123456B）"

123456"

C）123+"

D）显示出错信息

（28）有如下一组程序语句

CONSTalpha=90

alpha=100

alpha=90

PRINTalpha+100

A）190B）200C）90D）显示出错信息

（29）有如下程序

FORi=1TO3

FORj=1TOi

FORk=jTO3

a=a+1

NEXTk

NEXTj

NEXTi

PRINTa

END

在运行后输出a的值是

A）3B）14C）9D）21

（30）有如下程序

INPUTk

IFkIFkIFkIFka:

PRINTk;

a

运行时从键盘输入3,输出的结果是

A）31B）343C）3432D）34321

（31）有如下程序

a=3

IFaPRINT3;

ENDIF

IFaPRINT4;

IFaPRINT5;

IFaPRINT6;

PRINT

运行后输出结果是

A）3B）34C）345D）3456

（32）有如下程序

a=1

DOWHILEaa=2*a

b=b+a*a+1

LOOP

PRINTb

A）12B）32C）97D）344

（33）有如下程序

a$="

AaBbCcDdEe"

:

b$="

12345"

FORj=1to5STEP2

PRINTMID$（a$,j,1）+MID$（b$,（j+1）/2,1）;

A）A1B2C3B）AaB123C）a1b2c3D）A1a2B3

（34）有如下程序

INPUT"

Enteravalueoft:

"

;

t

SELECTCASEt

CASEISs=t+1

CASEISs=t+2

CASEISs=t+3

CASEELSE

s=t+4

ENDSELECT

PRINTt;

s

运行时,从键盘输入3,输出的结果是

A）34B）35C）36D）37

（35）有如下程序

France"

m$=MID$（a$,3,2）

FORj=1to5

READb$

e=INSTR（b$,m$）

s=s+e

PRINTs

DATAIran,China,Japan,Afghanistan,Guyana

A）5B）11C）16D）21

（36）有如下程序

FORj=1TO10

x=2*j-1

IFx/3=x\3ORx/5=x\5THENs=s+x

PRINT"

s="

s

运行后输出S的值是

A）27B）15C）32D）20

（37）有如下程序

sum=0

FORk=1TO10

FORk=10THEN

ELSE

sum=sum+k

PRINTsum

运行后输出的结果是

A）10B）55C）45D）36

（38）有如下程序

Flying"

b$="

IS"

c$="

funny!

PRINTa$+"

+LCASE$（b$）+"

+UCASE$（c$）

A）FlyingISfunnyB）FlyingFUNNY!

C）FlyingISFUNNY!

D）FLYINGISFUNNY!

（39）有如下程序

j=0:

n=0

DOWHILEnj=（j+1）*（j+2）

n=n+1

PRINTj;

n

A）01B）1823C）304D）33

（40）有如下程序

FORj=5TO3STEP-1

GOSUBs:

m=m+n

PRINTm;

s:

n=1+2*n

RETURN

运行后输出的是

A）126B）117C）66D）159

（41）有如下程序

DIMa（10）

FORj=0TO20STEP5

READa

（1）

PRINTa

（1）+a

（2）+a（3）

DATA1,2,3,4,5

A）5B）6C）1D）显示出错信息

（42）有如下程序

j=4

FORk=10TO6STEP-1

READa（j）

j=j+1

DATA9,7,5,3,1

FORJ=4TO8

PRINTa（j）;

运行时输出的结果是

A）97531B）13579

C）00135D）11111

（43）有如下程序

DIMarr（3,3）ASINTEGER

FORm=1TO3

FORn=1TO3

arr（m,n）=（m-1）*3+n

NEXTn

NEXTm

FORm=2TO3

FORn=1TO2

PRINTarr（n,m）;

A）25B）23C）47D）45

36565878

（44）有如下程序

n=3

FORK=3TO1STEP-1

x$=STRING$（n,"

$"

x$

n=n-1

NEXTK

A）3$$$B）1$C）3$D）1$

2$$2$$2$$2$$

1$3$1$$$3$$$

（45）有如下程序

DECLARESUBmult（x!

y!

a=1:

b=1

A="

a;

"

B="

b

CALLmult（（a）,b）

SUBmult（x,y）

x=2*x

y=3*y

X="

x;

Y="

y

ENDSUB

A）A=1,B=1B）A=1,B=1C）A=1,B=1D）A=1,B=1

X=2,Y=3X=2,Y=3X=2,Y=3X=2,Y=3

A=1,B=1A=2,B=3A=1,B=3A=2,B=1

（46）有如下程序

IFma=1

ELSEIFma=2

ELSEIFma=3

a=4

PRINTa;

sum=sum+a

A）3339B）3216C）1113D）1236

（47）在图形模式下,点亮坐标为x,y的象素所用的语句是

A）LOCATEx,y

B）PRESETx,y,5

c）PSET（x,y）

D）POSITIONx,y

（48）画一条长度为20个单位的水平直线,下面四个程序中哪个是正确的

A）SCREEN2,0B）SCREEN1,0

DRAW（0,0）-（20,0）LINE（0,0）-（0,20）

ENDEND

C）SCREEN1,0,D）SCREEN2,0

LINE（0,0）-（20,0）DRAW（0,0）-（0,20）

（49）有如下程序

A=10:

B=10:

C=120:

D=120

CLS

LINE（A,B）-（C,D）,1,B

运行后屏幕上显示的是

A）一个矩形B）一条直线

C）两条直线D）屏幕上无图形

（50）有如下程序

m$="

ABC"

n$="

abc"

k$=LCASE$（m$）

j$=UCASE$（n$）

PRINTCHR$（ASC（ks+js））

A）abcabcB）ABCABCC）AD）a

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

请将每空的正确答案写在答题卡上[1]￣[20]序号的横线上，答在试卷上不得分。

（1）计算机网络按通信距离来划分,可分为局域网和广域网。

因特网属于[1]。

-----

（2）当前盘是C,确保在D盘的根目录下建立一个子目录USER的一条DOS命令是[2]。

（3）要将当前盘当前目录中所有扩展名为.TXT的文件内容显示在屏幕上的DOS命令

是[3]。

（4）DOS命令分为内部命令和外部命令,CHKDSK命令是[4]命令。

（5）在Windows中,为了终止一个应用程序的运行,首先单击该应用程序窗口中的控

制菜单框,然后在控制菜单中单击[5]命令。

（6）数学式2cos2y+e（2x）的QBASIC表达式为[6]。

（注：

e（2x）中的（2x）为上标）

（7）执行语句PRINT-71\9/3MOD（1-2*3^2）的结果为[7]。

（8）有如下程序

1"

2"

c=VAL（a$）+VAL（b$）

d=VAL（a$+b$）

PRINTc+d

运行后,输出的值是[8]。

（9）四个字符串"

、"

abcd"

ABCDE"

及"

af"

中的最大者为[9]。

（10）以下程序的功能是将字符串"

逆序打印出来。

请在[10]处将程序补充

------

完整。

DECLAREFUNCTIONrev$（a$）

old$="

PRINTold$

PRINTrev$（old$）

FUNCTIONrev$（new$）

b$=MID$（new$,1,1）

IFb$="

THEN

rev$="

rev$=rev$（MID$（new$,2））+[10]

ENDFUNCTION

（11）有如下程序

multi=1

FORj=1TO6

multi=multi*j

PRINTmulti+j

运行后的输出是[11]。

（12）下面的程序是用选择交换法将n（n小于等于10）个数排为降序，请在[12]、

[13]、[14]处将程序补充完整。

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

OPTIONBASE1

Enteranumber:

DIMa（n）

databeforesorting:

FORi=1TOn

READa（i）:

PRINTa（i）;

DATA96,123,-7,39,0.14,4,7,22,42

FORi=[12]

FORj=[13]

IFa（k）------

IFkiTHENSWAPa（k）,a（i）

dataaftersorting:

PRINTa（i）

（13）有如下程序

DECLARESUBab（x%,y%）

CALLab（7.7,3.3）

SUBab（x%,y%）

x%=x%*2:

y%=y%*2

PRINTx%;

y%

运行后的输出结果是[15]。

（14）有如下程序

ABCD"

FORm=1TO4

PRINTTAB（5-m）;

[16]

运行后的输出结果如下

D

CD

BCD

ABCD

但程序不完整,请在[16]处补充使之完整。

（15）有如下程序

DECLARESUBp（k,s）

FORj=1TO3

CALLP（j,s）

sum=sum+5

SUBp（k,s）

s=1

FORm=1TOk

s=s*m

运行后输出sum的值是[17]。

（16）有如下程序

abc$="

ThePeople'

sDemocraticRepublicofYemen"

m=LEN（abc$）

FORj=1TOm

b$=MID$（abc$,j,1）

e"

ORb$="

o"

THENx=x+1

PRINTx

运行后输出x的值是[18]。

（17）下面程序的功能是产生100个不同的在-300到300（含-300和300）之间的随机

整数,但程序不完整,请在[19]和[20]处把程序补充完整。

DIMb（100）

FORj=1TO100

DO

b（j）=[19]*INT（301*RND）

flag=1

FORk=1TO[20]

IFb（j）=b（k）THENflag=0

LOOPUNTILflag=1

PRINTb（j）;