delphi1

一、单选

1)下列符号哪一个是Delphi中的合法变量名（）

A 6book

B if

C name[1]

D count1

2)下列常量说明中哪一个是合法的（）

A const c:=(b>4.5);

B const c:8.6;

C const c=3.2;

D const c:=”book ”;

3)下列实数中哪个是不合法的( )

A 0.45E+02

B .25+2

C 25E -3

D 24.67

4)设n为整型变量，其值为4568，表达式（n mod 1000）div100 ( )

A 分离出个位数字B分离出千位数字 C 分离出百位数字D分离出十位数字

5)有下面的程序段：

a:=false; b:=false; c:=true; x:=20;

if a then x:=x-10; x:=30;

if b then

if c then x:=34;

else x:=15; 假设所有变量都已定义，程序段执行后x的值（）

A 15

B 20

C 34

D 30

6)有下面的程序段：

ch1:= 'z'; ch2:= 'x';

if ch1 <>'x' then

case ch2 of

'x': case ch1 of

'z': s:= 'xy';

'y': s:='xz';

end;

'y': s:='yy';

end; 假设所有变量均已说明，程序段被执行后s的值是（）。

A 'xz'

B 'yy'

C 'xy'

D xy

7)有下面的程序段：

i:= 1;

repeat

n:= i * i; i:=i+2;

until n>2*i; 假设所有变量均已说明，循环体执行的次数（）。

A 1

B 2

C 3

D 4

8)有下面的程序段：

s:= 100; n:= 3;

for ch:= 'a' to 'e' do

if not odd(n) then s:=s-n;

n:=n+5; 假设所有变量均已说明，s的值（）。

A 100

B 97

C 61

D 74

9)以下正确的枚举类型定义是：( )

A type vowel=('a','e','i','o','u');

B type num=(1..3,8..10);

C type color=(red,blue,greeen);

D type realtype=(1.5,2.5,3.5,4.5);

10)集合表达式[1,2,3]+[4,5,6,1,2]的值为：( )

A[1,2,3,4,5,6,1,2] B [1,2,3] C [4,5,6,1,2] D [1,2,3,4,5]

11)Delphi没有用到的文件类型有（）

A、.frm

B、.pas

C、.dfm

D、.dpr

12)以下哪个组件不可以由用户输入编辑文本（）

A、TEdit

B、TcomboBox

C、TMaskEdit

D、Tlabel

13)下列常量定义合法的是（）

A、CONST width=7

B、CONST case=''7''

C、CONST 1A=7.9

D、CONST

5<>7

14)下列哪种表达式不能作为while语句的循环条件（）

A、i=1 B.、i:=1 C、true D、i<>1

15)下列哪个可以作为集合变量的基类型（）

A、integer B 、word C、real D 、byte

16)在修改数据前检查TQuery组件的状态，发现处于浏览状态，则调用该组件的什么

方法可以将其状态该为可修改（）

A、post

B、insert

C、edit

D、setkey

17)以下语句的循环体执行次数是（）

x:=37; y:=3

while y<=x do y:=y+y；

A、3

B、4

C、5

D、6

18)下列函数头具有传地址参数的是（）

A、function total(x:real);

B、procedure ab(a,b:real):real;

C、function total(const x:real):real;

D、function f(var f:real):integer;

19)Delphi中取值范围0到255的数据类型是（）

A、ShortInt

B、Byte

C、SmallInt

D、Word

20)以下关于事件的说法不正确的是（）

A、不一定要响应某个组件所定义的所有事件

B、多个组件可以共享同一个事件处理程序

C、根据需要可以响应任何组件的事件

D、单击Object Inspector中的事件处理程序名，Code Editor将自动进入该事件的代码段。

21)Delphi应用程序的执行入口为哪个文件（）

A、资源文件

B、单元文件

C、窗体文件

D、工程文件

22)以下哪个属性可以获得TEdit组件输入的文本内容（）

B、caption C、text D、Tag

23)下列常量定义合法的是（）

A、CONST width:=8

B、CONST case=''7''

C、CONST 1A=7.9

D、CONST

width=9

24)下列哪种变量类型不能作为For的循环变量（）

A、字符 B.、枚举C、子界D、实数

25)集合类型的数据其序数范围（）

A、0..255

B、0..65535

C、0..63

D、0..31

26)Query组件没有Table组件哪个属性( )

A、active

B、TableName

C、name

D、Database

27)执行以下语句后s的值为（）

S:=0; n:=10

while n>0 do n:=n-1; S:=S+n;

A、0

B、45

C、55

D、9

28)下列函数头合法的是（）

A、function total(x:real);

B、procedure ab(a,b:real):real;