一、填空题（20分，每空2分）
1、结构化程序设计要求程序中仅采用顺序、分支和循环三种控制结构，其中每种结构只能有一个入口和。
2、现实世界中对象具有自己的状态和行为。与此相对应，面向对象技术中的对象可以具有自己的和方法。
3、Delphi的一个项目由若干文件组成，其中与窗体文件对应的文件是。
4、在设计阶段，ListBox对象列表框中的内容是通过属性来进行设置的。
5、调用主窗体的方法，可以结束程序。
6、如果要在窗体上设计一个主菜单，首先要建立对象。
7、当Query对象中存储一条Delete语句时，执行该语句需要调用Query的方法。
8、与数学表达式对应的Object Pascal表达式是
9、通过Animate对象的属性设置，可以指定系统标准的A VI动画演示。
10、利用对象的LineTo等方法，可以绘制基本图形。
二、单项选择题（20分，每题2分）
1、下面哪句话比较准确地定义了Delphi （）。
A．面向对象的可视化的开发环境B．多媒体制作工具
C．数据库的客户端开发工具D．高级编程语言
2、下面哪个功能键可以调出Delphi 的联机帮助信息（）
A．F1键B．F2键
C．F3键D．F4键
3、“x 是小于10的非负数”的Object Pascal表达式是（）
A．0 ≤x < 10 B．(x >=0) AND (x < 10)
C．x >= 0, x<10 D．(x >= 0 ) OR (x<10)
4、工具栏上的一组按钮如果要构成互斥关系（如“左对齐”、“居中”、“右对齐”），它们的GroupIndex属性正确的设置是（）
A．GroupIndex属性值都为0 B．GroupIndex属性值非0，且互不相同
C．GroupIndex属性值非0，且相同D．GroupIndex属性值互不相同
5、利用Image对象的哪个属性设置，可以使Image对象的显示区域随着调入图像的大小自动调整以显示全图（）
A．Stretch B．AutoSize
C．Align D．Center
6、现建立一个简单报表，仅包含报表标题栏、数据列标题栏和数据栏，则在Bands属性的子属性中，不需要选择的是（）
A．HasColumnHeader B．Detail
C．Title D．Summary
7、在窗体上建立多页面，需要首先建立的对象是（）
A．TabControl B．PageControl
C．HeaderControl D．PageScroller
8、既可以通过选择输入、又可以直接输入的数据感知控件是（）
A．DBRadioGroup B．DBListBox
C．DBComboBox D．DBCheckBox
9、如果要求每当光标进入edit编辑框中时，编辑框都清空，可以在哪个事件处理程序中编写代码实现（）
A．OnClick B．OnMouseMove
C．OnKeyPress D．OnEnter
10、下面哪个组件不是容器组件（）
A．Form B．Panel
C．GroupBox D．Memo
三、判断题（10分，每题1分）
请给下列论述中正确的打上“√”，错误的打上“′”
1、（）在Delphi环境中，组件页上的组件是“类”而不是“对象”。
2、（）按钮组件和编辑框组件能够响应的事件有些是相同的。
3、（）在对文件的操作中，reset是建立并打开一个新文件。
4、（）编辑框edit中的内容能够设置为只读（即不能输入）。
5、（）OpenDialog组件的功能是指定一个文件名，并将文件内容加载到指定的编辑区中。
6、（）在一个项目中，可以有多个窗体，但只能有一个主窗体。
7、（）在Data Controls组件页上，有的数据控件没有datafield属性。
8、（）在程序运行期间，一个Table对象只能固定和一个关系表相连。
9、（）要想在数据集中增加计算字段，必须先将数据集的字段全部置为动态字段。
10、（）在设计阶段，如果在Query对象的SQL语句中设置了参数，则必须在Query的Params属性中为参数设置数据类型。
四、程序填空题（40分，每题10分）
1、（10分，每空2分）
本程序由主窗体form1和子窗体form2组成，设计界面如下图所示：
主窗体上建立的对象有Image1、Button1（加载图片）、Button2（退出）、OpenDialog1。
子窗体上建立的对象有Label1、BitBtm1（Yes）、BitBtm2（No）。
单击“加载图片”按钮，会弹出打开文件对话框。用户指定一个图像文件后，图像加载到Image1显示区中。
单击“退出”按钮，会弹出确认对话框（Form2）。如果用户按“Yes”键，程序结束；如果按“No”键，返回主窗体。
下面是Unit1的代码部分，请在下划线处完成程序填空。
---------------------------------------------------------------------------------------------------------------------
implementation
{$R *.dfm}
uses
①;
procedure TForm1.Button1Click(Sender: TObject);
begin
if ②then
Image1.Picture.LoadFromFile( ③);
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
if ④= mrYes then
⑤;
end;
end.
---------------------------------------------------------------------------------------------------------------------
2、（10分，每空2分）
数据库mydb中有关系表student，其结构如下：
student（sno学号，sname姓名，sex性别，birthday生日）
现编写一个学生信息浏览程序，设计界面和运行界面如下图所示。
在下划线处填写相应数据库组件的属性值：
Database1. DatabaseName : mydb
Table1. DatabaseName : mydb
Table1. TableName : student
Table1. Active : ①
Datasource1.DataSet : ②
DBNavigator1. DataSource : ③
DBEdit2. DataSource : ④
DBEdit2. DataField : ⑤
3、（10分，每空2分）
本程序的功能是对books表（图书信息）进行浏览，设计界面和运行界面如下图所示。其中，“在借册数”是根据当前显示的书号和borrow表（借书记录）的数据动态计算得到的。用户还可以输入指定书号，查找并定位到指定的记录。
在form1上建立的主要对象有：
Database1、Table1、Query1、DataSource1、DBEdit1~DBEdit3
Edit1~Edit2、Button1~Button3等
其中Database1与mydb数据库相连，Table1对象与books表相连，DBEdit1、DBEdit2、DBEdit3分别和bno（书号）、bname（书名）、author（作者）各列相连。
Query1的SQL语句是：
select count(*) num
from borrow
where bno = :bno
下面是Unit1单元的代码实现部分，请完成程序填空。
---------------------------------------------------------------------------------------------------------------------
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject); //查找
begin
table1. ①( 'bno' , edit2.Text , [] ) ;
end;
procedure TForm1.Button2Click(Sender: TObject); //下一记录
begin
table1. ②;
end;
procedure TForm1.Button3Click(Sender: TObject); //上一记录
begin
table1. ③;
end;
procedure TForm1.Table1AfterScroll(DataSet: TDataSet);
begin
query1.Close ;
query1. ④:= table1['bno'] ; query1.Open ;
edit1.Text := inttostr( ⑤) ;
end;
end.
---------------------------------------------------------------------------------------------------------------------
4、（10分，每空2分）
本程序实现一个简单的选课界面。设计界面和运行界面如下图所示：
该程序涉及到数据库中的两张表：course（课程表）和sc（选课表），表结构如下：
sc（sno 学号，cno课程号，grade成绩）
course（cno课号，cname课名，quota名额）
其中：sno和cno都是字符型。
在用户界面，操作员选中一门书、输入学号后，按“选课”键，完成选课功能，即在sc表中插入一条选课记录，并将course表中该课程的名额减1。
该界面要实现以下合法性检查：
l 当该学生已经选过此课，不能再选。
l 当所选课程名额已为0，不能再选。
在Form1上建立的数据库组件对象及连接关系如下：
Database1－Table1（与course表相连）－DataSource1－DBGrid1（显示课程信息）
Database1－Table2（与sc表相连，用于插入选课记录）
Database1－Query1
其中为Table1建立了3个永久字段：Table1cno（课程号）、Table1cname（课程名）、Table1quota （名额）。
Query1的SQL语句如下：
select cno
from sc
where sno = :sno and cno = :cno
下面是Unit1的代码实现部分，请完成程序填空：
--------------------------------------------------------------------------------------------------------------------- implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject); //“选课”键
begin
query1.Close ;
query1.ParamByName('sno').Value := ①;
query1.ParamByName('cno').Value := ②;
query1.Open ;
if query1['cno'] <> null then
begin
showmessage('已选过此课');
exit ;
end ;
if ③then
begin
showmessage('没有名额');
exit ;
end;
table2. ④( [edit1.Text , table1cno.Value , null] );
table1.Edit ;
table1quota.Value := table1quota.Value - 1 ; //名额减1
table1. ⑤;
end;
end.
---------------------------------------------------------------------------------------------------------------------
五、编程题（10分）
下图是本程序的设计界面（左）和运行界面（右）：
在form1上建立的对象有：Edit1~Edit4、Button1（输出）、RadioGroup1。
该程序的功能是：用户在Edit1~Edit3中分别输入3个整数，并指定输出最大或最小数，然后按“输出”键，输入数据中的最大或最小数将显示在Edit4中。
请编写单击“输出”按钮的事件处理程序。
Delphi 程序设计基础教程 第 1 章Delphi 集成开发环境 1. 填空题 (1) Delphi 是一个集成开发环境，从3程序设计、代码编译、调试，到最布程序的全部工作都可以在这个集成环境中完成。 (2) 在Delphi 集成环境的主要组成部分中有许多功能强大的工具，如：3主窗体、 对象树状视图、对象观察器、窗体设计器、代码编辑器工具等。 (3) Delphi 集成开发环境的界面分为4个部分，分别是。主窗口、窗体窗口、代码编辑窗口和对象查看器窗口 (4) 对象查看器的功能是：编辑设置窗体、组件的属性，并为窗体、组件添加事件的响应处理过程 (5) Delphi 主窗口由：标题栏、菜单栏、工具栏和组件板组成，它是打开其他窗口和退出D elphi 集成环境的主要界面。 2. 选择题 D(1) 对象查看器由组成。 A. 标题栏、菜单栏、属性标签和事件标签 B. 标题栏、菜单栏、对象选择器和事件标签 C. 标题栏、菜单栏、对象选择器和属性标签 D. 标题栏、对象选择器、属性标签和事件标签 D(2) Delphi 用来管理用户开发的应用程序中的各个文件，有序地管理可以极大地提高应用程序开发的质量和速度。 A. 单元 B. 组件 C. 属性 D. 项目 B(3) 用来编写应用程序的代码。 A. 调试器窗口 B. 代码编辑窗口
C. 报表生成器窗口 D. 数据库桌面窗口 B(4) 代码编辑窗口分为左、右两部分：。 A. 左边是单元代码窗口，右边是单元浏览器窗口 B. 左边是单元浏览器窗口，右边是单元代码窗口 C. 左边是单元调试窗口，右边是单元浏览器窗口 D. 左边是单元浏览器窗口，右边是单元调试窗口 A(5) 属性选项卡即标签名为“Properties”的选项卡，用于设置当前组件的属性，属性选项卡是一个两列的表格，。 A. 左列是属性标题，右列是属性值 B. 左列是组件名称，右列是事件名 C. 左列是属性标题，右列是事件名 D. 左列是组件名称，右列是属性值 C(6) 事件选项卡即标签名为“Events”的选项卡，用于为当前组件添加各种响应事件(如单击、拖曳事件等)，它随对象选择器中的所选组件而发生变化。事件选项卡为一个两列的表格，，默认时右列为空，在空格处双击则可以为当前组件添加事件，并进入代码编辑器窗口。 A. 左列是属性标题，右列是属性值 B. 左列是组件名称，右列是事件名 C. 左列是事件名称，右列是事件处理过程 D. 左列是组件名称，右列是属性值 ab(7) 在项目管理器中列出了当前项目中的各个，用户可以对它们进行操作。 A. 项目文件和单元文件 B. 项目文件和窗体文件 C. 项目文件和对象映射文件 D. 单元文件和窗体文件 3. 判断题 (1) Delphi 的状态栏不过是把一些常用的菜单命令以图标按钮的方式显示出来，以便于快速访问。(F )
《Delphi 程序设计》试题及解答 卷6 一、填空题（20分，每空2分） 1、现实世界中对象具有自己的状态和行为。对应着，面向对象技术中的对象可以具有自己的属性和 方法 。 2、结构化程序设计要求程序中仅采用顺序、分支和循环三种控制结构，其中每种结构只能有 一个入口 和一个出口。 3、Delphi 应用程序中单元文件的扩展名是 .pas 。 4、与数学表达式 53)(cos 2++x b a 对应的Object Pascal 表达式是 。 5、对于下面的条件表达式： （（3 <= x ）AND （x < 0）） OR （x in [1..10]） 当x = 3 时， 该表达式的值为 。 6、ListBox 对象列表框中的内容是通过 属性来进行设置的。 7、如果想设计DBGrid 对象的列标题和对齐方式，可以对DBGrid 对象的 属性进行设置。 8、时钟组件（Timer ）能有规律的以一定时间间隔触发 事件 9、能够实现格式化输入的编辑框组件是 10、利用 对象的LineTo 等方法，可以绘制基本图形。 二、单项选择题（20分，每题2分） 1、Delphi 程序设计的基本特点是（ ）。 A ． 可视化程序设计 B ． 代码程序设计 C ． 事件驱动编程 D ． A 和C 2、进度显示组件ProgressBar 的当前进度可以通过（ ）属性设置。 A ． Step B ．Scroll C ． Position D ．Max 3、下列变量命名正确的是（ ）。 A ．7ABC B ． My7 C ． page@2 D ．cmd..1 4、“x 是小于200的非负数”的Object Pascal 表达式是（ ）。 A ．0 ≤ x < 200 B ． x >= 0, x<200 C ．(x >=0) AN D (x < 200) D ． (x >= 0 ) OR (x<200) 5、在窗体上建立多页面的用户界面，需要首先建立的对象是（ ） A ． TabControl B ．PageControl C ． HeaderControl D ．PageScroller 6、能够删除edit1中内容的语句是（ ）。 A ． edit1.Clear ; B ．edit1. Focused ； C ． edit1.Text= null ; D ．edit1.text :='\0' ; 7、现建立一个简单报表，仅包含数据列标题栏、数据栏和汇总栏，则在Bands 属性的子属
本科实验报告专用纸 课程名称C语言程序设计成绩评定 实验项目名称简单的C语言程序设计 实验项目编号实验项目类型验证型 实验地点指导教师 学生姓名学号 学院专业 一、实验目的 1．掌握各种类型数据的输入输出的方法，能正确使用各种格式转换符。 2．学会正确使用逻辑运算符和逻辑表达式。 3．熟练掌握if语句和switch语句。 4．结合程序掌握一些简单的算法。 二、实验内容和实验要求 实验内容1:：试编写程序，用getchar函数读入两个字符给c1,c2，然后分别用putchar函数和printf函数 输出这个字符。 实验要求：(1) 输入事先已编好的程序，并运行该程序。分析运行结果是否正确。 （2）比较用Printf函数和putchar函数输出字符的特点。 实验内容2：给出一百分制成绩，要求输出成绩等 级’A’,’B’,’C’,’D,’E’。90分以上为’A’,80-89分 为’B’,70-79分为’C’,60-69分为’D’,60分以下 为’E’。 第1页（共11页）
实验要求：（1）事先编写好程序，要求分别用if语句和switch 语句来实现。 （2）输入程序，并运行该程序。分析运行结果是 否正确。 （3）再运行一次程序，输入分数为负值（如-70）， 这显然是输入是出错，不应该给出等级，修改程序， 使之能正确处理任何数据，当输入数据大于100和 小于0时，通知用户“输入数据错”，程序结束。 三、主要仪器设备 仪器：计算机 实验环境：windowsXP+visual c++6.0 四、实验过程 实验内容1： 原理：1）用getchar函数输入两个字符赋给c1,c2; 2) 用putchar函数输出这两个字符; 3) 用printf函数输 出这两个字符。 （1）源程序
实验一：简单程序设计实验 （1）编写一个 32 位无符号数除法的程序，要求将存放在 NUM1 中的 32 位无符号数与存放 在 NUM2 中的 16 位无符号数相除，结果存放在 NUM3 和 NUM4 中。 程序流程图略。 参考源程序： DATA SEGMENT NUM1 DD 2A8B7654H NUM2 DW 5ABCH NUM3 DW ? NUM4 DW ? DATA ENDS CODE SEGMENT ASSUME DS:DATA, CS:CODE START: MOV AX,DATA ;数据段寄存器初始化 MOV DS,AX MOV AX, WORD PTR NUM1 MOV DX, WORD PTR NUM1+2 DIV NUM2 MOV NUM3,AX MOV NUM4,DX MOV AH,4CH ;正常返回DOS 系统 INT 21H CODE ENDS END START （2）编写一个拆字程序。要求将存放在 ARY 单元的 2 位十六进制数 X 1X 2 拆为 X 1 和 X 2 两 部分，并以 0X 1 和 0X 2 的形式分别存入 ARY+1 和 ARY+2 单元中。 程序流程图略。 参考源程序： DATA SEGMENT ARY DB 2AH,?,? DATA ENDS CODE SEGMENT ASSUME DS:DATA, CS:CODE START: MOV AX,DATA MOV DS,AX MOV SI,OFFSET ARY ;取ARY 的偏移地址 MOV AL,[SI] ;取16进制数至AL
MOV BL,AL AND AL,0F0H ;取16进制数的高四位，即X1 SHR AL,4 MOV [SI+1],AL ;存0X1 MOV AL,BL AND AL,0FH ;取16进制数的低四位，即X2 MOV [SI+2],AL ;存0X2 MOV AH,4CH INT 21H CODE ENDS END START
《Delphi 程序设计》期末考试试卷和答案 一、单选题（每小题2分，共30分） 1．在 RadioGroup 组件中有 4 个单选框，当选中第 2 个单选框时， RadioGroup 组件中的 ItemIndex 属性值应为 （ B ）。 A ．0 B ．1 C ．2 D ．3 2．函数和过程的区别为（ A ）。 A ．函数执行后返回一个值，而过程不需返回值 B ．过程执行后返回一个值，而函数不需返回值 C ．过程在被调用时，能执行某种特殊功能并能返回到调用它的地方 D ．函数在被调用时，能执行某种特殊功能并能返回到调用它的地方 3．32 AND 27 的值是（ B ）。 A ．59 B ．0 C ．27 D ．32 4．窗体与数据模块的扩展名是（ B ）。 A ．.dcu B ．.dfm C ．.pas D ．.dpr 5．Delphi 中用什么函数来析构一个组件（ C ）。 A ．Constructor B ．Destroy C ．Free D ．Create 6．一个指针变量 ptr 的域成员 fs 访问的方法是（ C ）。 A ．ptr->fs B ．ptr.fs C ．ptr^fs D ．ptr@fs 7．Type aarrays=[1…8,1…5] of integer ，该类型定义了多少个下标元素（ D ）。 A ．45 B ．54 C ．48 D ．40 8．Delphi 的所有类都是从什么类继承下来的（ B ）。 A ．Tcomponent B ．Tobject C ．Tstream D ．Tnull 9．定义构造函数时用到的保留字是（ C ）。 A ．Class B ．.implementation C ．create D ．construction 10．下列组件中属于可视组件的是哪一个（ D ）。 A ．Tdatasource B ．Topendialog C ．Ttable D ．Tscrollbar 11．设有过程 procedure pro(V AR x,y:integer); 变量 a , b 为整型变量，其值分别为 5、6，则合法的过程调用语句是（ D ）。 A ．Pro(5,6) B ．pro(5,b) C ．pro(a,6) D ．pro(a,b) 12．下列组件中不能获取焦点的是（ B ）。 A ．Tedit B ．Tlabel C ． Trichedit D ．Ttreeview 13．定义抽象类必须使用的指令字是（ A ）。 A ．Abstract B ．virtual C ．dynamic D ．override” 14．Delphi 是哪个公司的产品（ C ）。 A ． Microsoft B ．IBM C ．Borland D ．DOM 15．窗体上放置有一个TEdit 类控件Edit1，当在Edit1中按下‘A’键时触发的事件和事件顺序是（ A ）。 A ．OnKeyDown->OnKeyPress->OnKeyUp B ．OnKeyDown->OnKeyUp C ．OnKeyPress D ．OnKeyDown->OnKeyUp->OnKeyPress 二、判断题（每小题1分，共10分） 1．Pascal 语言中可以把一个实数赋值给一个整型变量，系统会自动取整。（ 错 ） 2．所有类都有Name 属性。（ 错 ） 3．variant 类型的变量被动态赋值为一个特定的数据类型后，不能再赋值为一个其它的数据类型。（ 错 ） 4．函数MessageDlgPos 与MessageDlg 极为相似，只是MessageDlgPos 函数能够控制信息对话框的出现位置。（ 对 ） 5．BitBtn 控件可以用来制作一个带图片的按钮，而SpeedButton 则不能。（ 错 ） 6．MediaPlayer 控件的AutoEnable 属性是用来控制该控件是否可用。（ 错 ） 7．图形组件没有输入焦点，不能接受用户的输入，它只具有向用户显示的功能。（ 对 ） 8．Timer 组件常称为“定时器”，它每隔固定的时间间隔可以触发一个OnTimer 事件。（ 对 ） 9．Tobject 是delphi 的基类，系统中的每一个类都是Tobject 的子类。（ 对 ） 10．在MDI 应用程序窗口中，如果将一个窗体设为父穷窗体，要将它的FormStyle 属性设为FsStayOnTop 。（ 错 ） 三、填空题（每空2分，共20分） 1．用于建立菜单项的下划线快捷方式的字符是 & 。 2．在设计阶段，利用Image 对象的 picture 属性，可以加载一幅图片。 3．所有可视化的VCL 控件都是从 TControl 基类派生而来的。 黑龙江生物科技职业学院2008—2009学年第一学期期末考试试卷（A-2-2） 题目 得分 评卷人 一 题目 得分 评卷人 二 题目 得分 评卷人 三
实验3简单的程序设计 实验目的： 1．掌握表达式、赋值语句的正确书写规则。 2．掌握VB变量的定义和使用，表达式和常用函数的使用。 3．掌握InputBox与MsgBox的使用。 实验3.1函数考察 实验任务： 考察下列函数的值。 Round(-3.5) Round(3.5) Chr(66) Asc ("c") Asc(Chr(99)) Chr(Asc("K")) Ucase$("abcdefg") Lcase(“ABC”) Str(123.45) Val(“123AB”) Len(“123程序设计ABC”) LenB(“123程序设计ABC”) Ltrim(“ ABC”) String(3, “ABC”) Instr(“EFABCDEFG”, “ef”) Instr(2,“EFABCDEFG”, “ef”,1) Date() Now() Time() 实验步骤： 先自己分析以上函数的功能和可能的结果，然后在立即窗口用Print方法求出相应函数的值，对照比较自己的判断。 22
实验3.2表达式考察 实验任务： 考察下列表达式的值。 Dateadd(“m”,1,#1/30/2000#) Datediff(“y”,#12/03/1999#,#1/03/2000#) ‘计算时间间隔多少日 123 + Mid(“123456”,3,2) 123 & Mid(“123456”,3,2) Ucase(Mid(“abcdefgh”,3,4)) 16 / 4 – 2 ^ 5 * 8 / 4 MOD 5 \ 2 实验步骤： 先自己分析表达式的功能和可能的结果，然后在立即窗口用Print方法求出相应表达式的值，对照比较自己的判断。 实验3.3简单打印图形 实验任务： 使用Print方法、Tab函数和String函数设计一个过程，显示如图3-1所示的图形，并将结果保存到文件中。 图3-1 实验3.2运行界面 参考代码如下： Private Sub Form_Load() Print Tab(15); String(1, "1") Print Tab(14); String(3, "2") Print Tab(13); String(5, "3") Print Tab(12); String(7, "4") End Sub 操作提示： 应先将Form窗体的AutoRedraw属性值设为True。
试验项目试验一最简单的C程序设计
实验项目：实验一最简单的C程序设计 （所属课程：《C语言程序设计》学时:2） 一、实验目的 1．掌握：使用标准输入/输出函数进行常见数据类型的数据的输入/输出方法。 2．初步培养编制程序框图和源程序、准备测试数据以及实际调试程序的独立编程能力。 3．掌握顺序结构程序设计的基本思路。 二、实验条件 Pc和vc++编程环境 三、实验内容 1．熟悉编程环境。 2．输入并运行一个C程序 3．掌握各种格式转换符的正确使用方法。 4．编程序：设圆半径r=1．5，圆柱高h=3，求圆周长、圆面积、圆球表面积、圆球体积、圆柱体积。要求用scanf函数从键盘上输入数据（半径和高），输出各计算结果，输出时要求有文字说明，取小数点后2位数字。5．编程序：用getchar函数输入两个字符给C1、C2，然后分别用putchar函数和printf函数输出这两个字符。 四、实验步骤 编写程序，输入数据，观察结果。
五、实验结果 观察结果和预期是否一致。 实验项目：实验二选择结构程序设计 （所属课程：《C语言程序设计》学时:2） 一、实验目的 1．了解C语言表示逻辑量的方法（以0代表“假”，以非0代表“真”）。 2．学会正确使用逻辑运算符和逻辑表示式。 3．熟练掌握if语句和switch语句 二、实验条件 Pc和vc++编程环境 三、实验内容
1．有一函数： ?????≥-<≤-<=)10x (113x ) 10x 1(12x )1x (x y 用scanf 函数输入x 的值，求y 值。 运行程序，输入x 的值（分别为x<1、1≤x ＜10、x ≥10三种情况），检查输出的y 值是否正确。 2．给出一个百分制成绩，要求输出成绩等级A 、B 、C 、D 、E 。90分以上为A ，81～89分为B ，71～79分为C ，61～69分为D ，60分以下为E 。 3．输入4个整数，要求按由小到大顺序输出。 四、实验步骤 编写程序，输入数据，观察结果。 五、实验结果 观察结果和预期是否一致。 实验项目：实验三 循环结构程序设计
239页1题小时钟 procedure TForm1.Timer1Timer(Sender: TObject); var xt,yt:integer; h,m,s,ms:word; begin decodetime(time,h,m,s,ms); xt:=paintbox1.clientwidth div 2; yt:=paintbox1.clientheight div 2; paintbox1.refresh; paintbox1.canvas.moveto(xt,yt); paintbox1.canvas.pen.width:=3; paintbox1.canvas.lineto(xt+round(sin((60*h+m)/(12*60)*2*pi)*100), yt-round(cos((60*h+m)/(12*60)*2*pi)*100)); paintbox1.canvas.moveto(xt,yt); paintbox1.canvas.pen.width:=2; paintbox1.canvas.lineto(xt+round(sin(m/60*2*pi)*140), yt-round(cos(m/60*2*pi)*140)); paintbox1.canvas.moveto(xt,yt); paintbox1.canvas.pen.width:=1; paintbox1.canvas.lineto(xt+round(sin(s/60*2*pi)*180), yt-round(cos(s/60*2*pi)*180)); end; end. 239页3题求两点间的距离 procedure TForm1.Button1Click(Sender: TObject); begin paintbox1.Refresh; formpaint(sender); end; procedure TForm1.FormPaint(Sender: TObject); var xt,yt:integer; ax,ay,bx,by:integer; begin xt:=paintbox1.ClientWidth div 2; yt:=paintbox1.Clientheight div 2; paintbox1.canvas.MoveTo(xt,0); paintbox1.canvas.lineTo(xt,2*yt); paintbox1.canvas.MoveTo(0,yt); paintbox1.canvas.lineTo(2*xt,yt); ax:=strtoint(edit1.text);
嘉应学院计算机学院 实验报告 课程名称程序设计基础实验名称实验地点 指导老师实验时间提交时间 班级姓名座号 一、实验目的和要求 （1）掌握C语言中使用最多的一种语句——赋值语句的使用方法。 （2）掌握各种类型数据的输入输出的方法，能正确使用各种格式装换符。 （3）进一步掌握编写程序的和调试程序的方法。 二、实验环境和方法 实验方法： （一）综合运用课本所学的知识，用不同的算法实现在不同的程序功能。 （二）结合指导老师的指导，解决程序中的问题，正确解决实际中存在的异常情况，逐步改善功能。 （三）根据实验内容，编译程序。 实验环境：Windows xp Visual C++6.0 三、实验内容及过程描述 实验步骤： ①进入Visual C++ 6.0集成环境。 ②输入自己编好的程序。 ③检查一遍已输入的程序是否有错（包括输入时输错的和编程中的错误），如发现有错，及时改正。 ④进行编译和连接。如果在编译和连接过程中发现错误，频幕上会出现“报错信息”，根据提示找到出错位置和原因，加以改正。再进行编译，如此反复直到不出错为止。 ⑤运行程序并分析运行结果是否合理。在运行是要注意当输入不同的数据时所得结果是否正确，应运行多次，分别检查在不同情况下结果是否正确。 实验内容：编译以下题目的程序并调试运行。 实验① （1）通过下面的程序掌握各种格式装换符的正确使用方法。 ①输入以下程序：
②运行程序并分析结果如图： ③在此基础上，将程序第10~14行改为 c1=a;c2=b; f=3157.;g=0.; d=f;e=g; P=a=m=50000;q=b=n=-60000; 运行程序，分析结果如： （二）设圆半径r=1.5，圆柱高h=3，求圆周长﹑圆面积﹑圆球表面积﹑圆球体积﹑圆柱体积。 用scanf 输入数据，输出计算结果，输出时要求有文字说明，取小数点后两位数字。 程序代码为： #include
实验项目：实验一最简单的C程序设计 （所属课程：《C语言程序设计》学时:2） 一、实验目的 1．掌握：使用标准输入/输出函数进行常见数据类型的数据的输入/输出方法。 2．初步培养编制程序框图和源程序、准备测试数据以及实际调试程序的独立编程能力。 3．掌握顺序结构程序设计的基本思路。 二、实验条件 Pc和vc++编程环境 三、实验内容 1．熟悉编程环境。 2．输入并运行一个C程序 3．掌握各种格式转换符的正确使用方法。 4．编程序：设圆半径r=1．5，圆柱高h=3，求圆周长、圆面积、圆球表面积、圆球体积、圆柱体积。要求用scanf函数从键盘上输入数据（半径和高），输出各计算结果，输出时要求有文字说明，取小数点后2位数字。5．编程序：用getchar函数输入两个字符给C1、C2，然后分别用putchar 函数和printf函数输出这两个字符。 四、实验步骤 编写程序，输入数据，观察结果。 五、实验结果 观察结果和预期是否一致。 实验项目：实验二选择结构程序设计
（所属课程：《C 语言程序设计》学时:2） 一、实验目的 1．了解C 语言表示逻辑量的方法（以0代表“假”，以非0代表“真”）。 2．学会正确使用逻辑运算符和逻辑表达式。 3．熟练掌握if 语句和switch 语句 二、实验条件 Pc 和vc++编程环境 三、实验内容 1．有一函数： ?? ???≥-<≤-<=)10x (113x )10x 1(12x )1x (x y 用scanf 函数输入x 的值，求y 值。 运行程序，输入x 的值（分别为x<1、1≤x ＜10、x ≥10三种情况），检查输出的y 值是否正确。 2．给出一个百分制成绩，要求输出成绩等级A 、B 、C 、D 、E 。90分以上为A ，81～89分为B ，71～79分为C ，61～69分为D ，60分以下为E 。 3．输入4个整数，要求按由小到大顺序输出。 四、实验步骤 编写程序，输入数据，观察结果。 五、实验结果 观察结果和预期是否一致。 实验项目：实验三 循环结构程序设计
C语言程序设计上机实验报告 学院：机械工程学院 班级：机自161213 姓名：刘昊 学号： 实验时间：2017年3月6号 任课老师：张锐 C语言程序设计上机实验报告 实验一 一、实验名称: C程序的运行环境和运行C程序的方法 二、实验目的：了解在C编译系统上如何编辑、编译、连接和运行一个C程序 三、实验内容： (1). 输入并运行一个简单的C程序。 (2). 设计程序，对给定的两个数求和。 (3). 设计程序，对给定的两个数进行比较，然后输出其中较大的数。 四、源程序代码： ??代码1： 运行结果1： ??程序分析1： 该程序用来判断所输入的整数是否为一个素数，如果一个数能被除了1和它本身整除，还能被其它数整除，那么它就不是一个素数，因此，用for循环来进行整除过程的简写。 代码2： ? 运行结果2： ? 程序分析2： 简单的使用printf()和scanf()函数进行简单的数据运算。 代码3： 运行结果3： 程序分析3： 使用if语句进行判断。 五．实验总结 C语言程序设计上机实验报告 实验二 一、实验名称：顺序结构程序设计 二、实验目的：正确使用常用运算符（算术运算符、赋值运算符）的用法，熟练掌握算 术运算符及其表达式，逻辑运算符和逻辑表达式。
三、实验内容： (1). 编写程序，实现小写字母转大写。 (2). 编写程序，实现输入两个不同类型数据后，经过适当的运算（加、减、乘、除）后输出。 (3). 编写程序，计算三角形面积、立方体的体积和表面积、圆的面积和周长。 (4). 编写程序，实现单字符getchar和putchar输入输出。 (5). 编写程序，实现十进制、八进制、十六进制不同数制的输出。 四、源程序代码 代码1： 运行结果1： ??程序分析1： 所有的字符都有一个对应的数字与之对应，每一个小写字母对应的数与大写字母对应的数之间总是相差32，所以只需要对所输入的字符进行减法运算就可以转换为与之对应的大写字母。 代码2： ?运行结果2： ??程序分析2： 简单的数据运算和格式字符的输出。 代码3： 运行结果3： ??? ?程序分析3： 简单的数据运算实现相应的功能。 代码4： ??运行结果4： ?程序分析4： getchar函数的返回值是用户输入的第一个字符的ASCII码,如出错返回-1,且将用户输入的字符回显到屏幕. ?代码5： ??运行结果5： 程序分析5： 重要的是格式字符的使用，%d（输出十进制整型数）%o（以八进制格式输出整形数）%x（以十六进制格式输出整型数）%f（以带小数点的形式输出浮点数）%c（输出一个字符）%s（输出字符串，直到遇到\0） 五、实验总结 C语言程序设计上机实验报告 实验三 一、实验名称：选择结构程序设计 二、实验目的：正确使用逻辑运算符和逻辑表达式，熟练掌握if 语句和switch 语句， 学习调试程序。 三、实验内容： (1). 编写程序，用if 语句编程实现一分段函数的求解。 (2).用if 语句编写程序，求一元二次方程的根。
Delphi 程序设计-期末考试试卷和答案 装 订 线 一、单选题（每小题2分，共30分） 1．在 RadioGroup 组件中有 4 个单选框，当选中第 2 个单选框时， RadioGroup 组件中的 ItemIndex 属性值应为 （ B ）。 A ．0 B ．1 C ．2 D ．3 2．函数和过程的区别为（ A ）。 A ．函数执行后返回一个值，而过程不需返回值 B ．过程执行后返回一个值，而函数不需返回值 C ．过程在被调用时，能执行某种特殊功能并能返回到调用它的地方 D ．函数在被调用时，能执行某种特殊功能并能返回到调用它的地方 3．32 AND 27 的值是（ B ）。 A ．59 B ．0 C ．27 D ．32 4．窗体与数据模块的扩展名是（ B ）。 A ．.dcu B ．.dfm C ．.pas D ．.dpr 5．Delphi 中用什么函数来析构一个组件（ C ）。 A ．Constructor B ．Destroy C ．Free D ．Create 6．一个指针变量 ptr 的域成员 fs 访问的方法是（ C ）。 A ．ptr->fs B ．ptr.fs C ．ptr^fs D ．ptr@fs 7．Type aarrays=[1…8,1…5] of integer ，该类型定义了多少个下标元素（ D ）。 A ．45 B ．54 C ．48 D ．40 8．Delphi 的所有类都是从什么类继承下来的（ B ）。 A ．Tcomponent B ．Tobject C ．Tstream D ．Tnull 9．定义构造函数时用到的保留字是（ C ）。 A ．Class B ．.implementation C ．create D ．construction 10．下列组件中属于可视组件的是哪一个（ D ）。 A ．Tdatasource B ．Topendialog C ．Ttable D ．Tscrollbar 11．设有过程 procedure pro(V AR x,y:integer); 变量 a , b 为整型变量，其值分别为 5、6，则合法的过程调用语句是（ D ）。 A ．Pro(5,6) B ．pro(5,b) C ．pro(a,6) D ．pro(a,b) 12．下列组件中不能获取焦点的是（ B ）。 A ．Tedit B ．Tlabel C ． Trichedit D ．Ttreeview 13．定义抽象类必须使用的指令字是（ A ）。 A ．Abstract B ．virtual C ．dynamic D ．override ” 14．Delphi 是哪个公司的产品（ C ）。 A ． Microsoft B ．IBM C ．Borland D ．DOM 15．窗体上放置有一个TEdit 类控件Edit1，当在Edit1中按下‘A ’键时触发的事件和事件顺序是（ A ）。 A ．OnKeyDown->OnKeyPress->OnKeyUp B ．OnKeyDown->OnKeyUp C ．OnKeyPress D ．OnKeyDown->OnKeyUp->OnKeyPress 二、判断题（每小题1分，共10分） 1．Pascal 语言中可以把一个实数赋值给一个整型变量，系统会自动取整。（ 错 ） 2．所有类都有Name 属性。（ 错 ） 3．variant 类型的变量被动态赋值为一个特定的数据类型后，不能再赋值为一个其它的数据类型。（ 错 ） 4．函数MessageDlgPos 与MessageDlg 极为相似，只是MessageDlgPos 函数能够控制信息对话框的出现位置。（ 对 ） 5．BitBtn 控件可以用来制作一个带图片的按钮，而SpeedButton 则不能。（ 错 ） 6．MediaPlayer 控件的AutoEnable 属性是用来控制该控件是否可用。（ 错 ） 7．图形组件没有输入焦点，不能接受用户的输入，它只具有向用户显示的功能。（ 对 ） 8．Timer 组件常称为“定时器”，它每隔固定的时间间隔可以触发一个OnTimer 事件。（ 对 ） 9．Tobject 是delphi 的基类，系统中的每一个类都是Tobject 的子类。（ 对 ） 10．在MDI 应用程序窗口中，如果将一个窗体设为父穷窗体，要将它的FormStyle 属性设为FsStayOnTop 。（ 错 ） 三、填空题（每空2分，共20分） 1．用于建立菜单项的下划线快捷方式的字符是 & 。 2．在设计阶段，利用Image 对象的 picture 属性，可以加载一幅图片。 3．所有可视化的VCL 控件都是从 TControl 基类派生而来的。
实验一：C简单程序设计 1、略。 2、编程：要求程序运行后在屏幕上输出如下信息： My Program Is Running！ Good,and I'm very glad now！ #include
printf("\n"); } system("pause"); } 5、编程：输出一个形如“◣”的三角图形（要求：共5行，第1行一个“*”，第2行二个“*”，......，最后一行5个“*”）。（此题为选做）。 #include 《Delphi程序设计》复习题 一、单项选择题 1、下面哪句话对Delphi的描述是正确的（）。 A．只能用于数据库客户端开发的工具B．Delphi的编程语言全部是面向过程的C．Delphi的编程语言是Java D．面向对象的可视化的开发环境 2、在Delphi中，建立一个文本编辑区域，可采用下列（）。 A、命令按钮 B、文本标签控件 C、Edit控件 D、Timer控件 3、表达式60 ＋19 div 2 的值是（） A．67 B．79 C．69 D．80 4、一个Delphi应用程序必有一个（）文件和至少一个单元文件。 A) 执行程序B) 项目C) 数据D)图形 5、最适合于在工具栏上放置的工具按钮是（） A．Button B．RadioButton C．SpeedButton D．BitBtm 6、Delphi应用程序设计基于（）语言。 A) Basic B) C++ C) Pascal D) Object Pascal 7、下列表达式中（）不是布尔表达式。 A) A=3 B) A div B C) A and B D) A>B 8、“x 是小于100的非负数”的Object Pascal表达式是（）。 A．0 ≤x < 100 B．x >= 0, x<100 C．(x >=0) AND (x < 100) D．(x >= 0 ) OR (x<100) 9、利用Image对象的哪个属性设置，可以使加载的图像自动放大或缩小，以适应Image的显示区域（） A．Stretch B．AutoSize C．Align D．Center 10、工具栏上的一个SpeedButton按钮如果要设置为状态按钮，则正确设置的方法是（） A．将SpeedButton按钮的GroupIndex属性设置为0，且AllowAllUp属性设置为True。 B．将SpeedButton按钮的GroupIndex属性设置为0，且AllowAllUp属性设置为False。 C．将SpeedButton按钮的GroupIndex属性设置为非0值，且AllowAllUp属性设置为True。 D．将SpeedButton按钮的GroupIndex属性设置为非0值，且AllowAllUp属性设置为False。 11、要改变一个对象的高度，应使用属性（）。 A、Font B、ForcColor C、Name D、Height 12、表达式30 ＋19 div 2 的值是（） A．37 B．49 C．39 D．40 13、下列合法的变量名是（）。 A、na + e B、e- 3r C、r_3 D、5we 实验５：最简单的Ｃ语言程序设计 一、实验目的： （１）掌握Ｃ语言中使用最多的一种语句——赋值语句的使用方法。（２）掌握各种类型数据的输入输出的方法，能正确使用各种格式转换符。（３）进一步掌握编写程序和调试程序的方法。 二、实验内容和步骤： 1、通过下面的程序掌握各种格式转换符的正确使用方法。 （1）输入以下程序： /* Note:Your choice is C IDE */ # include int main() {int a,b; float d,e; char c1,c2; double f,g; long m,n; unsigned int p,q; a=61;b=62; c1=a;c2=b; f=3157.890121;g=0.123456789; d=f;e=g; p=a=m=50000;q=b=n=-60000; printf("a=%d,b=%d\nc1=%c,c2=%c\nd=%6.2f,e=%6.2f\n",a,b,c1,c2,d,e); printf("f=%15.6f,g=%15.12f\nm=%1d,n=%1d\np=%u,q=%u\n",f,g,m,n,p,q); } 显示结果： （4）用sizeof运算符分别检测程序中各类型的数据占多少字节。例如，int型变量a的字节数为sizeof(a)或sizeof(int),用printf函数语句输出各类型变量的长度（字节数）。 程序如下： # include 《Delphi程序设计》试题及解答卷 ————————————————————————————————作者：————————————————————————————————日期： 《Delphi 程序设计》试题及解答 卷5 一、填空题（20分，每空2分） 1、现实世界中对象具有自己的状态和行为。对应着，面向对象技术中的对象可以具有自己的属性和 方法 。 2、Delphi 应用程序中项目文件的扩展名是 .dpr 。 3、结构化程序设计要求程序中仅采用顺序、分支和循环三种控制结构，其中每种结构只能有 一个人口 和一个出口。 4、在Delphi 集成开发环境中，如果想要直接设置或者修改对象的属性，可以通过对象查看器（Object Inspector ）中的 属性 或 Properties 窗口直接进行设置。 5、ListBox 对象列表框中的内容是通过 items 属性来进行设置的。 6、时钟组件(Timer)能有规律的以一定时间间隔触发 ontimer 事件。 7、如果让界面上的一个按钮变为不可用，需要将它的 enabled 属性设为False 。 8、Image 组件可通过设置其 Autosize 属性为True 使Image 组件根据图像的大小自动调整显示窗口大小。 9、Delphi 的一个项目由若干文件组成，其中文件名后缀含有“~”的文件为 备份文件 。 10、与数学表达式 53)(cos 2++x b a 对应的Object Pascal 表达式是 Cos*cos*(a+b) /(3*x) 二、单项选择题（30分，每题3分） 1、Delphi 程序设计的基本特点是（D ） A ． 可视化程序设计 B ． 代码程序设计 C ． 事件驱动编程 D ． A 和C 2、修改窗体的标题时，应当设置form 的属性是（ A ） A ．Caption B ． Name C ． Text D ． Label 3、下列哪个常量说明语句是正确的（ D ） A. const x := (c < 16); B. const x : 16 ; C. const x := 16 ; D const x = 16 ; 4、“x 是小于100的非负数”的Object Pascal 表达式是（ C ） A ．0 ≤ x < 100 B ． x >= 0, x<100 C ．(x >=0) AN D (x < 100) D ． (x >= 0 ) OR (x<100) 5、编辑框（Edit ）中的文本发生改变时引发的事件是（ B ） A ．AutoSize B ．OnChange C ．SetFocus D ．SetText 6、表达式 30 ＋ 19 div 2 的值是（ C ） A ． 37 B ． 49 C ． 39 D ． 40 7、现建立一个简单报表，仅包含报表标题栏、数据栏和汇总栏，则在Bands 属性的子属性Delphi程序设计复习题
C语言 实验五 最简单的C语言程序设计
《Delphi程序设计》测试试题及解答卷
相关主题
文本预览