【程序说明】 如下图所示，设计一个可供逐条记录翻页查看职工档案表（ZGDA. DBF)内容的表单，首先打开

创建一个交叉表查询，统计并显示各班每门课程的平均成绩，统计显示结果如下图所示(要求：直接用查询设计视图建立交叉表查询，不允许用其他查询做数据源)，所建查询命名为“qT3”。 说明：“学号”字段的前8位为班级编号，平均成绩取整要求用Round函数实现。

背景

某高速公路膨胀土路堑段，长480m，挖深8～9m，右侧为顺层边坡，岩土层倾角为12°～15°，结构面内摩擦角为5°，黏聚力为12kPa。边坡加固防护方案如下图所示。

施工单位采用如下图所示的工艺流程组织施工，于4月完成该路段边坡施工。

当年6月，在雨水作用下该边坡发生了部分滑坍，施工单位认为是原设计不合理所致，因此提出了下图所示柔性支护结构方案，并按相关程序报批变更设计。

【问题】

1．指出图中A、B分别代表的施工过程。

2．说明对该路段路堑护坡变更设计应采取的正确程序。

3．结合图中说明土工格栅与土之间的三种相互作用。

4．结合地质情况说明图中碎石层的作用。

5．结合示意图，说明“种植土＋种草”有哪几种作用。

数据库mydb中有关系表student，其结构如下:

student

现编写一个学生信息浏览程序，设计界面和运行界面如下图所示。

在下划线处填写相应数据库组件的属性值:

Databasel. DatabaseName:mydb

Tablel. DatabaseName:mydb

Tablel. TableName:student

Tablel. Active:①____

Datasourcel. DataSet:②________

DBNavigatorl. DataSource:③________________

DBEdit 2. DataSource:④_________________________

DBEdit 2. DataField:⑤________________________

有以下结构体说明和变量定义，如下图所示，指针p、q、r分别指向一个链表中的3个连续结点。 struct node { int data; struct node *next; } *p,*q,*r;

现要将q和r所指结点的先后位置交换，同时要保持链表的连续，以下错误的程序段是()。

A．r-＞next=q;q-＞next=r-＞next;p-＞next=r；

B．q-＞next=r-＞neaxt;p-＞next=r;r-＞next=q；

C．p-＞next=r;q-＞next=r-＞next;r-＞next=q；

D．q-＞next=r-＞next;r-＞next=q;p-＞next=r；

有以下结构体说明和变量定义，如下图所示，指针p、q、r分别指向一个链表中的三个连续结点。struct node { int data; struct node *next; } *p,*q,*r; 现要将q和r所指结点的先后位置交换，同时要保持链表的连续，以下错误的程序段是()。

A．r-＞next=q;q-＞next=r-＞next;p-＞next=r;

B．q-＞next=r-＞next;p-＞next=r;r-＞next=q;

C．p-＞next=r;q-＞next=r-＞next;r-＞next=p;

D．q-＞next=r-＞next;r-＞next=q;p-＞next=r;

本程序由主窗体forml和子窗体form2组成，设计界面如下图所示:

主窗体上建立的对象有Imagel. Buttonl(加载图片),Button2(退出)、OpenDiaiogl。

子窗体上建立的对象有Labell. BitBtml(Yes),BitBtm2(No)

单云“加载图片”按钮，会弹出打开文件对话框。用户指定一个图像文件后，图像加载到

Imagel显示区中。

单击“退出”按钮，会弹出确认对话框(Form2)。如果用户按“Yes”键，程序结束;如果按

"No"键，返回主窗体。

下面是Unitl的代码部分，请在下划线处完成程序填空。

__________________________________________________________________________________

implementation

($R * . dfm}

uses①______;

procedure TForml. ButtonlClick (Sender: TObject);

begin

if②_______________________then

Imagel. Picture. LoadFromFile(③______________________)

end;

procedure TForml. Buttot.2Click (Sender: TObject);

begin

if④_________________________= mrYes then

⑤_____________;

end;

end.

___________________________________________

A.在设计“粘贴”菜单项时，在菜单编辑器窗口中设置了“有效”属性(有“√”)

B.菜单中的横线是在该菜单项的标题输入框中输入了一个“-”(减号)字符

C.在设计“选中”菜单项时，在菜单编辑器窗口中设置了“复选”属性(有“√”)

D.在设计该弹出菜单的主菜单项时，在菜单编辑器窗口中去掉了“可见”前面的“√”