（填空题）
Sqr（3）＋StrToInt（‘19’）＝（）
正确答案
答案解析
略
相似试题
（单选题）
表达式60＋19div2的值是（）
（单选题）
表达式30＋19div2的值是（）
（填空题）
在窗体上画一个名称为Command1、标题为“计算”的命令按钮；画3个文本框，名称分别为Text1、Text2和Text3；然后画4个标签，名称分别为Label1、Label2、Label3和Label4，标题分别为“操作数1”、“操作数2”、“运算结果”、“＝”符；再建立一个含有4个单选按纽的RadioGroup组件，名称为RadioGroup 1，标题分别为“+”、“-”、“*”和“/”。程序运行后，在Text1、Text2中输入两个整数值，选中一个单选按钮后单击命令按钮，相应的计算结果显示在Text3，程序运行情况如图所示。请填入适当的内容，将程序补充完整。 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;
（填空题）
本程序根据用户选择的运算符对输入的二个操作数进行运算，并显示运算结果。设计界面和运行界面如图所示。其中，运算符是一个含有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;
（填空题）
3-2 Int（1.1）=（）
（判断题）
Delphi中的菜单项有3种类型：普通按钮型、复选框型和单选按钮型。
（简答题）
输入一个数字，程序判断如下情况：如果能被3整除但同时不能被5整除，显示“该数只能被3整除”；如果只能被5整除但是不能被3整除，显示“该数只能被5整除”，若被3整除同时被5整除，显示“该数可以同时被3、5整除”。 本程序设计界面及运行界面如下： 请编写单击“判断”（Button1）按钮的事件处理程序。
（简答题）
本程序设计界面及运行界面如下： 程序功能是：用户输入一个3位正整数后，按“确定”键，该数字的个位、十位、百位数字分别显示在输出框中。如果输入的数据不在规定范围之内，程序要给出错误提示。 请编写单击“确定”按钮的事件处理程序。
（简答题）
下图是本程序的设计界面（左）和运行界面（右）： 在form1上建立的对象有：Edit1~Edit4、Button1（输出）、RadioGroup1。 该程序的功能是：用户在Edit1~Edit3中分别输入3个整数，并指定输出最大或最小数，然后按“输出”键，输入数据中的最大或最小数将显示在Edit4中。 请编写单击“输出”按钮的事件处理程序。
