У вас вопросы?
У нас ответы:) SamZan.net

Задание 1. Создайте приложение обеспечивающее ввод двух целых чисел и выполнения над ними арифметических опе

Работа добавлена на сайт samzan.net: 2016-03-13

Поможем написать учебную работу

Если у вас возникли сложности с курсовой, контрольной, дипломной, рефератом, отчетом по практике, научно-исследовательской и любой другой работой - мы готовы помочь.

Предоплата всего

от 25%

Подписываем

договор

Выберите тип работы:

Скидка 25% при заказе до 19.3.2025

Практическая работа № 4

Задание 1. Создайте приложение, обеспечивающее ввод двух целых чисел и выполнения над ними арифметических операций сложения, вычитания, умножения и вещественного деления.

Рис. 1. Вид формы приложения с компонентами

Алгоритм выполнения работы

1. Открыть и сохранит проект под именем Calculator.  

2. Заголовок окна Калькулятор.

3. Разместите на форме Form1 компоненты Edit1, Edit2 и Label1, Label2.

4. Задайте для свойства Caption компонентов Label1 и Label2 значения «Операнд», а  в  Edit1, Edit2 удалить текст. Для этого выберите объект в окне Инспектора объектов, на странице Properties выберите свойство Text и удалите текст.

При нажатой клавише Shift выделите компоненты Edit1, Edit2, Label1, Label2 и, вызвав контекстное меню, командой Позиция (Position) ► Выровнять (Align) ► По горизонтали (Horizontal) ► По центру (Centers) выровняйте их по горизонтали.

5. Для выбора одной из четырех арифметических операций над операндами используйте переключатели, размещенные на панели RadioGroup.

ПРИМЕЧАНИЕ. Компонент RadioGroup позволяет отображать и редактировать поля с ограниченным множеством возможных значений.

Разместите на форме Калькулятор компонент RadioGroup1 из палитры Standard.

Задайте для свойства Caption компонента RadioGroup1 значение «Операция».

Так как количество переключателей в группе и надписи около них определяются свойством Items, выберите в Инспекторе объектов компонент RadioGroup1, а на странице свойств выберите свойство Items (список элементов). В окне Редактор Списка Строк введите список элементов — символов арифметических операций: +, - ,*, /, как показано ниже.

Рис. 2. Редактирование списка элементов в панели RadioGroup

Щелкнув мышью на кнопке ОК, завершите формирование списка арифметических операций.

6. В окне Инспектора объектов задайте для свойства RadioGroup.Items Index значение 0, чтобы сделать первую кнопку (сложение) выбранной по умолчанию.

ПРИМЕЧАНИЕ. Определить во время выполнения, какая кнопка выбрана в данный момент, можно по индексу ItemIndex (0 означает первую кнопку, -1 — ни одна кнопка не выбрана).

7. Задайте размер символов компонента RadioGroup, установив для свойства RadioGroup: Font.Size значение 11 пунктов.

 

8. Разместите на форме Calculator кнопку Button1 и задайте для нее надпись «Вычислить».

9. Разместите на форме Calculator компоненты Edit3, Label3 и задайте для свойства Label3.Caption значение «Результат».

10. Удалите текст Edit3 в соответствующих компонентах.

11. Выровняйте компоненты Edit3 и Label3, отцентрировав их по горизонтали.

12. Зафиксируйте положение компонентов на форме, выбрав в меню Delphi команду Правка ► Зафиксировать. Форма будет выглядеть, как показано на рис. 3. 

Рис. 3. Вид формы приложения с компонентами

13. Для обработки щелчка на кнопке Button1 с изображением символа «=» событие  OnClick.

Для решения задачи вычисления арифметических операций над двумя целыми операндами введите в текст процедуры TForm1.Btn1Click следующее описание:

Как видно из текста процедуры, в операторе case выполняется выбор варианта вычислений, а вывод результата вычислений выполняется оператором, следующим после оператора case, причем для случая b=0 результат не вычисляется и в окне Edit3 не выводится, а выводится сообщение в окне сообщений.

14. Откомпилируйте и запустите приложение на выполнение.

 

Рис. 4. Вид окна приложения с сообщением об ошибке ввода делителя.

Задание 2.  Ввести ФИО сотрудника, его зарплату за день, количество отработанных дней.

Вывести  зарплату сотрудника за отработанные дни. Учесть налоги на зарплату в размере 19,5 % от зарплаты.




1. Деловая беседа как основной вид делового общения
2. Южноуральский государственный университет национальный исследовательский университет Факультет жур
3. Перенос полей на форму из редактора полей
4. либо антенны улучшающего ее характеристики например для выравнивания фазы в раскрыве рупорной антенны
5. Экология Москвы
6. Детскоюношеский центр спорта и туризма Историческая справка соревнований мероприятия
7. Ні 11 Лютого 2013 16-36 Переглядів- 128 Фото- lomonintek
8. Тема- Ризик та елементи теорії корисності Концепція корисності
9. ТЕМАТИКА ВАРИАНТ 6 Выполнил-
10. Взгляд у неё был сквозь душу