的是Delphi程序员笔试题目分享.doc

delphi程序员  时间:2021-02-11  阅读:()

D e lp hi程序员笔试题目分享i. 用户开发程序时需要经常在窗体和编辑器窗口之间来回切换可使用快捷键0 。

A、 F12和F11

B、 F12和F13

C、 F12和CtrlF12

D、 F12和AltF12

E、 F12和ShiftF12

2. 某函数如下

Functioncheck(n, k:Integer) :Integer;

Varm:Integer;

Begin

Repeat m:二nmodlO;n:=ndivlO;

K:=k-1

Untilk=O;

C heck:=m

End;

若调用语句y:=check (3725, 3 ) 运行后y值为 0

A、 7

B、 5

C、 2

D、 0

3.以下那个组件不可以由用户输入编辑文本( )

A、 TEdi t

B、 Tcombo Box

C、 TMas kEdit

D、 T1 abel

E、 TS t ringGrid

4.一个对象类可以继承和直接使用它的父类的所有成员除了 0

A、 public ±或

B、 pr ivate ±或

C、 p rot ected域和p ri vate域

D、 pr otected域和方法

E、 private域和方法

5.Delp h没有用到的文件类型有( ) 。

A、 •frm

B、 . pa s

C、 • d fm

D、 .d pr

E、 .res

6 . Query组件没有T able组件那样的( )属性。

A、 Data So urce

B、 Table Name

C、 Filte red

D、 Databa se

E、 UpdateO bject

7.下面关于属性的论述正确的是0 。

A、属性能实现wri te方法

B、属性能实现read方法

C、属性可以只读或只写

D、属性可以公开或非公开

E、属性不能直接存取

8.调试程序时需要执行执行点所在的源代码行并停留在下一个源代码行。可通过0菜单项进行。

A、 Run

B、 StepO ve r

C、 Tracel nto

D、 Trac eToNextSou r ceLine

E、 Run toCurso r

9 .设a是布尔变量其它是整型变量下面正确的赋值

语句是0

A、 x=y div7

B、 x:=y :=zl

C、 a:=x =ymodz

D、 x y:=z

E、 xy二a

10 •表达式r ound () modt rune ()的值是0

A、 0

B、 1

C、 2

D、 3

E、 4

11.下列常量定义合法的是0

A、 CONSTwid th=7;

B、 C0NSTcase=\\\’ 7\\\’ 

C、 CONST 1A=;

D、 C ONSTcentur y=yeardivlO 0:

E、 C0NST5 7 :

12.以下运算符中运算优先级最高的是0

A、

B、 OR

C、 〉 =

D、 DIV

13.已知a、 b 、 c 、 d是同类型的简单变量而且已有互不相同的值执行下列语句b:=a;a:=c;d:=a;d :=b;后其值相等的变量是0

A、 a c

B、 a, d

C、 c b

D、 b a

E、无法确定

14.已知有说明Var x:real ;下列程序段中的错误为  ca sexO:x:=O;

1 :x:=le nd

A、 case表达式中有常数

B、 case常量和c a se表达式类型不一样

C、赋值语句两边类型不一致

D、 case表达式为关系表达式

E、 cas e语法不规范

15.以下语句的循环执行次数是0x :=37;y:=3whileyA、 3

B、 4

C、 5

E、 0

16.程序Fori : =1 to5dofo rj:=2toldowrite In (WV^WV) ;

输出的\\\’ *\\\’个数为0

A、 5

B、 10

C、 15

D、 25

E、 30

17.下列函数头合法的是( )

A、 fun ctiont otal (x:real ) ;

B、 proce d ureab(a, b:real) :real:

C、 procedur e sum;

D、 fun ctionf (varf :real) : inte ger;

E、 pro ced ureFontL is tBoxKeyDo w n(Sender:TObject ;varK ey:Word;

Sh i ft:TShift St ate; ) ;

18.己知函数如下func tion f (n: int ege r) : integer ; begin

ifn =0thenf :=0

EtherNetservers年付仅10美元,美国洛杉矶VPS/1核512M内存10GB硬盘1Gpbs端口月流量500GB/2个IP

EtherNetservers是一家成立于2013年的英国主机商,提供基于OpenVZ和KVM架构的VPS,数据中心包括美国洛杉矶、新泽西和杰克逊维尔,商家支持使用PayPal、支付宝等付款方式,提供 60 天退款保证,这在IDC行业来说很少见,也可见商家对自家产品很有信心。有需要便宜VPS、多IP VPS的朋友可以关注一下。优惠码SUMMER-VPS-15 (终身 15% 的折扣)SUMMER-...

数脉科技香港自营,10Mbps CN2物理机420元/月

数脉科技怎么样?数脉科技品牌创办于2019,由一家从2012年开始从事idc行业的商家创办,目前主营产品是香港服务器,线路有阿里云线路和自营CN2线路,均为中国大陆直连带宽,适合建站及运行各种负载较高的项目,同时支持人民币、台币、美元等结算,提供支付宝、微信、PayPal付款方式。本次数脉科技给发来了新的7月促销活动,CN2+BGP线路的香港服务器,带宽10m起,配置E3-16G-30M-3IP,...

半月湾($59.99/年),升级带宽至200M起步 三网CN2 GIA线路

在前面的文章中就有介绍到半月湾Half Moon Bay Cloud服务商有提供洛杉矶DC5数据中心云服务器,这个堪比我们可能熟悉的某服务商,如果我们有用过的话会发现这个服务商的价格比较贵,而且一直缺货。这里,于是半月湾服务商看到机会来了,于是有新增同机房的CN2 GIA优化线路。在之前的文章中介绍到Half Moon Bay Cloud DC5机房且进行过测评。这次的变化是从原来基础的年付49....

delphi程序员为你推荐
微信对骂群微信团队发来的让文明使用微信是什么意思?文件夹删不掉文件夹是文件夹删不掉怎么办?人人时光机五月天的专辑都有哪些?网站联盟百度网盟是什么,怎么加入如何建立自己的网站怎么创建自己的网站怎么点亮qq空间图标如何点亮QQ空间图标qq空间打扮如何打扮QQ空间?iphone6上市时间苹果6什么时候在中国大陆上市分词技术怎么在SEO中学会运用关键词分词技术怎么上传音乐怎么上传音乐
长沙虚拟主机 个人域名备案流程 gitcafe 新站长网 北京双线 hinet idc是什么 共享主机 中国电信测速网 多线空间 安徽双线服务器 厦门电信 空间登陆首页 net空间 镇江高防 97rb 广州服务器托管 万网服务器 web服务器 远程登录 更多