结构化程序设计的基本原则是取消goto语句，程序中仅采用顺序、（）和循环三种控制结构。

本程序设计界面及运行界面如下： 程序功能是：用户输入一个3位正整数后，按“确定”键，该数字的个位、十位、百位...

问答题

本程序设计界面及运行界面如下：

程序功能是：用户输入一个3位正整数后，按“确定”键，该数字的个位、十位、百位数字分别显示在输出框中。如果输入的数据不在规定范围之内，程序要给出错误提示。 
请编写单击“确定”按钮的事件处理程序。

数据库mydb中有关系表student，其结构如下：  student（sno学号，sname姓名，sex性别...

填空题

数据库mydb中有关系表student，其结构如下： 
student（sno学号，sname姓名，sex性别，birthday生日） 
现编写一个学生信息浏览程序，设计界面和运行界面如下图所示：

在下划线处填写相应数据库组件的属性值： 
Database1. DatabaseName : mydb  
Table1. DatabaseName :  mydb  T
able1. TableName :  student 
Table1. Active :（①）          
Datasource1.DataSet :（②）         
DBNavigator1. DataSource : （③）         
DBEdit2. DataSource :（④）          
DBEdit2. DataField :（⑤）  

本程序根据用户选择的运算符对输入的二个操作数进行运算，并显示运算结果。设计界面和运行界面如图所示。其中，运算符...

填空题

本程序根据用户选择的运算符对输入的二个操作数进行运算，并显示运算结果。设计界面和运行界面如图所示。其中，运算符是一个含有4个单选按纽的RadioGroup1对象。
 

下面是单击“运算”按钮的事件处理程序，请根据功能要求完成程序填空。

procedure TForm1.Button1Click(Sender: TObject);//运算 
var 
   x1,x2,y :Integer; 
begin 
   x1 := StrToInt( Edit1. ①);
     x2 : = StrToInt( Edit2. ②);   
 Case ③.ItemIndex of    
 0: y := x1 + x2 ;     
1: y := x1 - x2;    
 2: y := x1 * x2;    
 3: y := x1 Div x2;   
 End; 
   Edit3. ④:= IntToStr( ⑤); 
end;