Управляющие конструкции среды программирования Delphi 7

Разработать программу для вычисления арифметического выражения и вывода полученного результата.

Порядок выполнения задания:

1. Запустить Delphi (Пуск – Все программы – Borland Delphi 7 – Delphi 7).

2. Указать заголовок формы (свойству Caption установить значение «Вычисление значения выражения») и разместить на ней компоненты для ввода исходных данных (компонент Edit1 и Edit2) и вывода результата (компонент Edit3). Свойство Text компонентов Edit1, Edit2 и Edit3 оставить пустым. Для каждого компонента указать комментарий в виде метки (Label1 (Caption=«X=»), Label2 (Caption=«Y=») и Label3(Caption=«Результат»)). Изменить свойство Position формы Form1, так, чтобы при запуске программы форма открывалась в центральной части экрана. Изменить размеры формы.

3. На форме расположить кнопку Button1. Свойству Caption кнопки установить значение «Вычислить». Для этого компонента создать событие для расчета значения исходного выражения. Для этого необходимо дважды щелкнуть левой клавиши мыши. В результате откроется модуль формы Unit1, где уже будет прописана процедура для обработки события нажатия на кнопку – procedure TForm1.Button1Click(Sender: TObject). В этой процедуре в разделе описания переменных перечислить используемые переменные и указать их тип (переменные X и Y – целые, а переменная Z – результат вычислений). В теле процедуры (между операторами Begin и End) написать тело программы:

– переменным X и Y присвоить значения, которые вводятся в компоненты Edit1 и Edit2 (свойство Text), соответственно, сделав перевод из строкового типа данных в числовой, поскольку компонент Edit возвращает строковый тип данных (для перевода можно использовать функцию StrToInt);

– вычислить значение выражения и результат записать в переменную Z (при вычислении необходимо использовать оператор условии If);

– вывести значение переменный Z в компонент Edit3, при этом необходимо преобразовать вещественный тип данных в строковый (используется функция FloatToStr).

4. Проверить программу на наличие ошибок и в случае их обнаружения устранить.

5. Запустить программу на выполнение (выполнить команду Run – Run или нажать клавишу F9 или на панели инструментов нажать на кнопку «Зеленый треугольник»).

6. Сохранить программу в отдельной папке. Для этого необходимо сохранить весь проект с помощью команды File – Save All.

Добавить комментарий