06-07-2Delphi程序设计(A).docVIP

班级：　　　　　　学号：　　　　　　　　　　姓名：　　　　　　　　　　　　　　　　　　　　　　　　 1．Delphi是面向 的程序设计语言。 （A）过程 （B）工程 （C）事件 （D）对象 2．工程文件名的后缀是 。 （A）.dpr （B）.frm （C）.pas （D）.des 3. 下列常量说明语句中哪个是合法的？ （A）Const C:= (A3.4) (B) Const C : 3.4 （C）Const C = 3.4 （D）Const C:= 10 and 20 4. 下列实数中哪个是不合法的？ （A）0.25E+0.2 （B）.25+2 （C）25E+2 （D）34.5 5. ·lg（a+b）·(-3)的Object Pascal表达式是 。 （A）E * * X * Lg（A+B）*（-3 * t * * 2） （B）Exp（X）* Ln（A+B）*（-3 * t * t） （C）Exp（X）* Ln（A+B）*（-3 * Sqrt（t）） （D）Exp（X）* Ln（A+B）/Ln（10）* （-3 * Sqr（t）） 6. 设a，b，c的值分别为1，2，3；L，M，N的值分别是True，False，True，以下表达式值为True的是 。 （A）（b2）or（c2）and M （B）not N and not （a=c） （C）（L=M）and not（M=N） （D）（ab）and L 7. 有下面程序段： a:= False；b:= False；c:= False； x:= 15； if a then x:= x-10； else if b then x:= x-5 else if c then x:= 20 else x:= 25； 则程序段执行完成后，x的值为 。 （A）5 （B）15 （C）20 （D）25 8. 有下面的程序段： ch1:= ’Z’；ch2:= ’X’； if ch1’X’ then Case ch2 of ’X’ : Case ch1 of ’Z’ : s:= ’XZ’； ’Y’ : s:= ’XY’； end； ’Y’ : s:= ’YY’； end； 假设所有变量均已说明，程序段被执行后的s的值是 。 （A）XZ （B）YY （C）YX （D）XY 9．设有如下程序段 I:= 1； Repeat N:= I*I； I:= I+2； Until nI； 假设所有变量均已说明，问其中循环体的执行次数是 。 （A）1 （B）2 （C）3 （D）4 10．设有如下程序段： s:= 100； n:= 3； for ch:= ’a’ to ’e’ do begin if not odd（n）then s:= s-n； n:= n+5； end； 假设所有变量均以已说明，程序执行后的s的值是 。 （A）97 （B）89 （C）74 （D）58 11. 函数Trunc（10＋Random*10）值是在哪个范围内的整数 。 （A）（0，1） （B）（1，10） （C）（10，20） （D）（10，90） 12. 设n为整数变量，且已赋值为1898，表达式（n mod 100）div 10 表示 。 （A）分离出各位数字 （B）分离出十位数字 （C）分离出百位数字 （D）分离出千位数字 13. 已知如下子界类型定义及变量声明： type ntype=-10..10； var m: ntype； n: Integer； 问下列语句哪一个可能产生错误： （A）n:= m； （B）m:= n； （C）n:= abs（m）； （D）n:= n+m； 14．集合表达式[’m’, ’n’, ’b’]*[ ’a’, ’b’, ’c’]+[ ’m’, ’n’, ’b’]的值为 （A）[’m’, ’n’, ’b’] （B）[’b’] （C）[’a’, ’b’, ’c’] （D）[’a’, ’c’] 15．如果要在两个菜单命令项之间加一条分隔线，可在标题文本框中键入 。 （A）－ （B）＋ （C） （D）# 16．在程序中可以通过复选框和单选按钮的 属性值来判断他们的当前状态。 （A）Caption （B）Value （C）Checked （D