Практическая работа №7
Тема: Разработка программ по двух- и много-альтернативными разветвлениями. Цель: Научиться разрабатывать программы по много-альтернативными условиями.
ход работы
1. Создать в своей рабочей папке каталог PRACT07.
2. Запустить среда Delphi и создать новый приложение.
3. Выполнить File — Save All, указав пунктом назначения созданный Вами каталог PRACT07, под именами, которые предлагает среда Delphi.
Задания. Создать форму для выполнения склонение слова.
1. В зависимости от значения целого положительного числа из промежутка от 1 до 10 вывести слово «попугай» в верном падеже.
2. Вывести слово «метр» в верном падеже.Внешний вид входной формы:
Результаты работы программы:
4. На заготовку формы, которая появилась в окне, нужно разместить 2 кнопки Edit (для ввода чисел), а также 2 кнопки Label (для вывода результатов выполнения заданий) и 2 кнопки Button (отменяет слово «попугай» и отменяет слово «Метр»)
5. В данной задачи программируется только обработчик события OnClick кнопок Button. Выбираем этот метод в инспекторе объектов и вписываем необходимый программный код: Задача 1:
Объяснение. В соответствии с лингвистическими правилами для числа 1 нужно писать «1 попугай», для чисел 2, 3, 4 — дописывать слово «попугая», для чисел 5, 6, 7, 8, 9, 10 — слово «попугаев».При введении любых других цифр программа имеет сообщать о некорректности введения.
Задача 2:
Объяснение. В соответствии с лингвистическими правилами для чисел, которые заканчиваются на 1, нужно писать «метр», для чисел, которые заканчиваются на 2, 3, 4 — дописывать слово «метры», для чисел, которые заканчиваются на 5, 6, 7, 8 9 10 — слово
«Метров». Исключение составляют только числа 11, 12, 13, 14, в которых дописывается слово
«Метров».
6. Сохраним полученный приложение на диске и запустим его на выполнения.
7. Завершить работу со средой Delphi.
8. С операционной оболочки запустить файл с расширением ехе, который образовался в созданной Вами папке PRACT07.Результат работы программы продемонстрировать преподавателю.
9. Навести порядок на рабочем месте.