用户界面如下图所示的应用程序： 说明如下： 窗体Form1上放置2个按钮对象Button1（运算键）、Button2（退出），3个编辑框对象edit1（操作数）、edit2（被操作数）、edit3（结果输出框），一个GroupBox对象GroupBox1（内含4个单选按钮，用于选择4个运算类型），一个复选框checkbox1（“显示除法余数”）。 界面上对象的代码如下： procedure TForm1.Button1Click(Sender: TObject); var x,y,z :integer; begin x:= strtoint(edit1.Text); y:= strtoint(edit2.Text); case radiogroup1.itemindex of 0: z:= x+y ; 1: z:= x-y ; 2: z:= x*y ; 3: z:= x div y; end; edit3.text:=inttostr(z); if checkbox1.checked and (radiogroup1.itemindex=3) then if (x mod y<>0)then edit3.text:=Edit3.text+. 余 .+ inttostr(x mod y) ; end; procedure TForm1.Edit1Exit(Sender: TObject); var x : integer ; begin if (edit1.Text=..) then begin showmessage(.操作数为空.) ; edit1.SetFocus ; exit ; end ; x:= strtoint(edit1.Text); if (x<1)or(x>100) then begin showmessage(.操作数越界.); edit1.SetFocus ; end ; end; procedure TForm1.Edit2Exit(Sender: TObject); var x : integer ; begin if (edit2.Text=..) then begin showmessage(.被操作数为空.) ; edit2.SetFocus ; exit ; end ; x:= strtoint(edit2.Text); if (x<1)or(x>100) then begin showmessage(.被操作数越限.); edit2.SetFocus ; end ; end; procedure TForm1.Button2Click(Sender: TObject); //退出按钮 begin form1.close; end; 阅读上面的代码，请写出如上图所示输入edit1输入数字23 ， edit2输入数字5的时候，点击“运算键”执行后，请写出edit3显示的内容。
