表达式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中。 请编写单击“输出”按钮的事件处理程序。
简答题查看答案