Delphi程序员笔试题目 一. 选择题 1. 某函数如下: Function check(n,k:Integer):Integer; Var m:Integer; Begin Repeat m:=n mod 10; n:=n div 10; K:=k-1 Until k=0; Check:=m End; 若调用语句y:=check(3725,3),运行后y值为:() A、 7 B、 5 C、 2 D、 0 2. 一个对象类可以继承和直接使用它的父类的所有成员,除了:() A、 public域 B、 private域 C、 protected域和private域 D、 protected域和方法 E、 private域和方法 3. 下面关于属性的论述正确的是()。 A、 属性能实现write方法 B、 属性能实现read方法 C、 属性可以只读或只写 D、 属性可以公开或非公开 E、属性不能直接存取 4. 设a是布尔变量,其它是整型变量,下面正确的赋值语句是( ) A、 x=y div 7 B、 x:=y:=z+1 C、 a:=x=y mod z D、 x+y:=z E、x+y=a