
Практическая работа №6
Тема: Создание программ с одно- альтернативным разветвлением.
Цель: Научиться определять области допустимых значений, заданных программно или с помощью структурных схем алгоритмов.
ход работы
1. Создать в своей рабочей папке каталог PRACT06.
2. Запустить среда Delphi и создать новый приложение.
3. Выполнить File — Save All, указав пунктом назначения созданный Вами каталог PRACT06, под именами, которые предлагает среда Delphi.
Задание 1.На рисунках показано а) заштрихованную область значений, которые может приобретать переменная х на числовой оси.
Для данной области записать условный оператор на языке Delphi.
Математически условие принадлежности значение переменной х указанным промежуткам на числовой оси можно записать так: [2; 3] [4; + ∞).
Другие варианты задания (для самостоятельной работы): б) в)
г) д)
е)
Внешний вид входной формы:
Результат работы программы:
4. На заготовку формы, которая появилась в окне, нужно разместить 1 кнопку Edit (для ввода числа), а также 6 кнопок Label (для вывода результатов выполнения заданий 1а), 1б), 4в), 1г), 1д), 1е)).
5. В данной задачи программируется только обработчик события OnClick кнопок Label. Выбираем этот метод в инспекторе объектов и вписываем необходимый программный код: Задача 1а)
Задача 1б)
Записи языке программирования математических выражений из задач 1в), 1г) 1д), 1е) попробуйте выполнить самостоятельно.
6. Сохраним полученный приложение на диске и запустим его на выполнения.
7. Завершить работу со средой Delphi.
8. С операционной оболочки запустить файл с расширением ехе, который образовался в созданной Вами папке PRACT06.Результат работы программы продемонстрировать преподавателю.
9. Задача 2. Решить обратную задачу — нарисовать на числовой оси область ограничения, которая соответствует логическим выражениям в операторе If:
а) if (x> = 2) and (x <= 7) or (x = 8) then … Решение (записать в тетрадь):
Математическая запись области: [2; 7] {8} б) if (x> = 2) and ((x <= 6) and (x <= 7)) then …
в) if ((x> = 2) and ((x <= 6) or ((x> = 3) and (x <= 7))) then … г) if (x = 2) or (x = 4 ) then …
д) if ((x> = 2) and (x <= 3)) or ((x> = 4) and (x <= 5)) then … е) if (x> = 2) and (x <= 3) and (x> = 3) and (x <= 4) then …
10. Решения задач продемонстрировать преподавателю.
11. Навести порядок на рабочем месте.