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
最近我们是不是在讨论较多的是关于K12教育的问题,培训机构由于资本的介入确实让家长更为焦虑,对于这样的整改我们还是很支持的。实际上,在云服务器市场中,我们也看到内卷和资本的力量,各大云服务商竞争也是相当激烈,更不用说个人和小公司服务商日子确实不好过。今天有看到UCloud发布的夏季促销活动,直接提前和双十一保价挂钩。这就是说,人家直接在暑假的时候就上线双十一的活动。早年的双十一活动会提前一周到十天...
六一云 成立于2018年,归属于西安六一网络科技有限公司,是一家国内正规持有IDC ISP CDN IRCS电信经营许可证书的老牌商家。大陆持证公司受大陆各部门监管不好用支持退款退现,再也不怕被割韭菜了!主要业务有:国内高防云,美国高防云,美国cera大带宽,香港CTG,香港沙田CN2,海外站群服务,物理机,宿母鸡等,另外也诚招代理欢迎咨询。官网www.61cloud.net最新直销劲爆...
厦门靠谱云股份有限公司 双十一到了,站长我就给介绍一家折扣力度名列前茅的云厂商——萤光云。1H2G2M的高防50G云服务器,依照他们的规则叠加优惠,可以做到12元/月。更大配置和带宽的价格,也在一般云厂商中脱颖而出,性价比超高。官网:www.lightnode.cn叠加优惠:全区季付55折+满100-50各个配置价格表:地域配置双十一优惠价说明福州(带50G防御)/上海/北京1H2G2M12元/月...