Практическая работа №6 – Создание программ с одно- альтернативным разветвлением


Практическая работа №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. Сохраним полученный приложение на диске и запустим его на выполнения.

Читать  ПРАКТИЧЕСКАЯ РАБОТА № 2 – Работа с компонентами Button и BitBtn

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. Навести порядок на рабочем месте.

[Всего голосов: 3    Средний: 5/5]