Создайте приложение, на форму которого помещены компоненты: Button — 1 шт. Label — 1 шт. Edit — 2
10-11 класс
|
шт.
Напишите обработчик события OnClick
Хоть бы язык уточняли... Ну, допустим, Делфи:
try
label1.caption := floattostr(strtofloat(edit1.Text) / strtofloat(edit2.text));
except
on EDivByZero do showmessage('Devide by 0');
else showmessage('Error');
end;
edit1.Text := '';
edit2.Text := '';
unit Unit1;
interface
uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;
type TForm1 = class(TForm) Button1: TButton; Edit1: TEdit; Edit2: TEdit; Label1: TLabel;
procedure Button1Click(Sender: TObject);
private { Private declarations }
public { Public declarations } end;
var Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
try
label1.Caption:=FloatToStr(StrToFloat(Edit1.Text)/StrToFloat(Edit2.Text));
except
On E : EZeroDivide do
ShowMessage('Деление на 0 запрещено : ');
end;
end;
end.
Другие вопросы из категории
заранее спасибо...
Нечетное то вычислить сумму : 1 + 2 + .+N.Составить программу на паскале
Читайте также
доброй ночи, уважаемые программисты и успевающие в учебе студенты. помогите, пожалуйста, написать программу на C++ (в визуальной вкладке).
ВОТ ЗАДАНИЕ:
дано три переменные вещественного типа. если их значения упорядочены по возрастанию или убыванию, то удвоить их; иначе заменить значение каждой переменной на противоположное. вывести значения переменных.
я прикрепила несколько тестовых файлов (блокнот) в которых есть несколько вариантов решение этого задание (то есть коды программ), а вы скажите какой из них лучше всего подходит, а также скажите какие компоненты нужно кинуть на форму-дизайн (то есть какие кнопки, и что на них писать). в этих 3 файлов есть написанный код программы, нужно написать: на какие кнопки что писать и какой вариант решение больше подходит.
заранее огромное спасибо всем за помощь!!!
Алфавит, спомощью которого записано сообщение, содержит _____ символов.
объясните пожалуйста как решается
Алфавит, с помощью которого записано сообщение содержит.... символ.
добрый вечер, всем. помогите, пожалуйста, написать программу на Ассемблере.
задание:
Создать программу на языке Ассемблер, что позволяет организовать вычисления над элементами массивов
Объединить два массива 8-битных целых чисел со знаком. Сначала элементы второго затем первого.
заранее огромное спасибо всем!
Разработать
программу в соответствии со своим вариантом: создать структуру типа «запись», выполнить
обработку данных.