《国家开放大学《Delphi程序设计》形考任务阶段测验1-4参考答案》由会员分享，可在线阅读，更多相关《国家开放大学《Delphi程序设计》形考任务阶段测验1-4参考答案（19页珍藏版）》请在金锄头文库上搜索。
1、国家开放大学Delphi程序设计形考任务阶段测验1-4参考答案阶段测验1一、单项选择题1.对于下面的条件表达式：（3 = x）AND （x 2 AND FALSE 的结果是：（ ）。A.3B.2C.FALSED.TRUE7.Delphi的一个项目由若干文件组成，其中与窗体文件对应的文件是（ ）。A.单元文件B.以“.”为后缀名的文件C.以“.grd”为后缀名的文件D.以上都不对8.Delphi的一个项目由若干文件组成，其中主程序文件的默认名是：（ ）A.project1.dprB.project1.C.project1.pD.project1.pas9.Delphi没有用到的文件类型有（ ）。
2、A.frmB.pasC.dfmD.dpr10.Delphi的一个项目由若干文件组成，其中文件名后缀含有“”的文件是：（ ）A.代码文件B.临时文件C.无用文件D.备份文件11.Delphi应用程序中单元文件的扩展名是：（ ）A.*.pasB.*.uitC.*.uD.*.12.Delphi应用程序中项目文件的扩展名是*.（）。A.dprB.pasC.GrdD.db13.表达式round(4.2) mod trunc(2.8)的值是（ ）。A.0B.1C.2D.314.结构化程序设计中，对于程序中采用的三种控制结构，要求每种结构只能有（）个入口和一个出口。A.一B.二C.三D.四15.如果让界面上
3、的一个按钮变为不可用，需要将它的哪一个属性设为False。A.CloseB.EnabledC.GridD.See16.设a、x、y、z等都是整型变量，下面正确的赋值语句是（）。A.x=y div 7B.x+y=aC.x :=y mod zD.x+y:=z17.设n为整型变量，且已赋值为1898，表达式(n mod 100) div 10表示：（）。A.分离出个位数字B.分离出十位数字C.分离出百位数字D.分离出千位数字18.调试程序时，需要执行执行点所在的源代码行，并停留在下一个源代码行。可通过（ ）菜单项进行。A.RunB.Step OverC.Trace IntoD. Trace To N
4、ext Source Line19.下列常量定义合法的是（ ）A.CONST width=7;B.CONST case=7;C.CONST 1A=7.9;D.CONST century=year div 100;20.下面的函数引用将返回字符串“笔记本电脑100台！”的是：( )。A.format(%s电脑%d台！，笔记本,100)B.format(%s电脑%d台！，100 ,笔记本)C.format(电脑%s %d台！，笔记本,100)D.format(%d电脑%s台！，笔记本,100)二、判断题21.粘贴时，如果作为容器的组件已被选择，剪贴板中的组件会当作容器组件的子组件来粘贴。（）22.
5、( (x=5) OR (x=-5) ) AND ( x in 1.9 ) 当x=10时，表达式的值为真（或true）（）23.Delphi菜单中的“Run Into Cursor”菜单项，用于调试程序时，执行执行点所在的源代码行，并停留在下一个源代码行。（）24.Delphi是面向对象的可视化的开发环境，编程语言采用Object C。（）25.大多数组件的属性可以在运行时改变，而且，有些只能在运行时刻改变。（）26.结构化程序设计要求程序中仅采用顺序、分支2种控制结构，其中每种结构只能有一个入口和二个出口。（）27.同一类的不同对象如何区分，主要通过对象的属性的不同属性取值来区分。（）28.P
6、ascal 语言中可以把一个实数赋值给一个整型变量，系统会自动取整。（）29.对象具有属性和方法，这是对象的主要特征。（）30.一个对象可以具有多个属性，但只能有一个方法。（）三、程序设计题31.阅读下面的程序段，其中edit1edit3均为编辑框组件，当 s 为 3 ，edit1输入数字9 ， edit2输入数字3的时候，执行下面的程序段，请选择edit3应显示的内容为。var x,y,z,s :integer;begin x:= strtoint(edit1.Text); y:= strtoint(edit2.Text); case s of 0: z:= x+y ; 1: z:= x-y
7、 ; 2: z:= x*y ; 3: z:= x div y; end; edit3.text:=inttostr(z); if s=3 then if (x mod y0)then edit3.text:=Edit3.text+ - + inttostr(x mod y) ;end;执行后，edit3显示的内容为：（）A.3B.2C.1D.0阶段测验2一、单项选择题1.能够删除edit1中内容的语句是（ ）。A.edit1.Clear ;B.edit1.Focused ；C.edit1.Text= null ;D.edit1.text :=0 ;2.一个Delphi窗体Form1中包含了一个
8、Tbutton类的Button1控件，下面代码，将产生怎样的结果？（ ）。 Tform1.button1Click(Sender); begin Self.Caption:=self; Self.Color:=ClBlue; EventX(Sender); end; Tform1.EventX(Sender:TObject); begin Sender.Tag:=10; end;A.窗体的标题为Self，颜色为蓝色，窗体的Tag属性等于10B.Button1的标题为Self，颜色为蓝色，Tag属性等于10C.Button1的标题为Self，颜色为蓝色，窗体的Tag属性等于10D.窗体的标题为S
9、elf，颜色为蓝色，Button的Tag属性等于103.以下那个组件在程序运行时不可以由用户输入编辑文本（ ）。A.EditB.comboBoxC.MaskEditD.label4.用于异常处理的关键字不包括（ ）。A.tryB.exceptC.finallyD.error5.RadioGroup对象中的单选按钮个数及名称是通过哪个属性来进行设置的。A.NameB.CaptionC.ITD.Items6.窗体表单上放置有一个Edit类控件Edit1，当在Edit1中按下A键时触发的事件和事件顺序是（ ）。A.OnKeyDown-OnKeyPress-OnKeyUpB.OnKeyDown-OnK
10、eyUpC.OnKeyPressD.OnKeyDown-OnKeyUp-OnKeyPress7.下面的语句是用来判断用户选择RadioGroup组件的第几个选项按钮：if RadioGroup1.ItemIndex=6 then A.5B.6C.7D.88.为了使计时器控件Timer1每隔0.5秒就触发一次事件并执行事件代码，应将Timer1控件的Interval属性设置为：（ ）。A.500B.50C.5D.0.59.下面的语句用来在Memo组件的第2行位置插入“在第二行显示”字样的文本，请补充完整：memo2.lines.Insert(_,在第二行显示);A.0B.1C.2D.-110.如
11、果让界面上的一个按钮在运行的时候变为不可见，需要将它的哪一个属性设为False。A.VisibleB.NameC.EnableD.See11.数组类型定义：Type aarrays=18,15 of integer ；该数组类型包含了多少个整型元素（ ）。A.5B.8C.48D.4012.集合类型的数据大小取值范围是：（ ）。A.0.255B.0.65535C.0.63D.0.3113.标准对话框组件中的OpenDialog组件需要执行哪个方法，会弹出常用的“打开文件对话框”。A.MessageB.CloseC.ExecuteD.Show14.假如 C 盘存在aa.txt 文件，则有关下列代码
12、理解不正确的是：（ ）varFileVar: file;beginAssignFile(FileVar, c:aa.txt); /语句1Reset(FileVar); /语句2CloseFile(FileVar); /语句3CloseFile(FileVar); /语句4end;A.语句1 是与外部文件建立联系B.语句2 是以读方式打开文件C.语句3 不会引发异常D.语句4 正常关闭文件不会引发异常15.使用ReWrite 函数可以以什么方式打开一个已存在的文本文件或创建一个新的文本文件？（ ）A.只读方式B.写入方式C.追加方式D.插入方式16.时钟组件(Timer)能有规律的以一定时间间隔
13、触发哪个事件。A.ColumnsB.OnTimerC.GridD.DoTime17.Timer控件的常用事件是（ ），当此控件跨过时间间隔时发生。A.OntimerB.POSTC.APPENDD.IntervalTime18.MessageBox函数与MessageDlg函数的相同之处在于( )。A.所有参数都相同。B.都没法指定显示不同的图形符号。C.都可以显示多个按钮，也可以指定显示不同的图形符号。D.以上都不对。19.进度显示组件ProgressBar的当前进度可以通过（ ）属性设置。A.StepB.ScrollC.PositionD.Max20.ListBox对象列表框中的内容是通过哪个属性来进行设置的。A.ColumnsB.NameC.GridD.Items二、判断题21.根据需要可以响应任何组件的事件。？（）2
