Использование дополнительного модуля

Для того, чтобы в основном модуле можно было воспользоваться функцией расположенной в дополнительном модуле, следует, прежде всего, дополнить инструкцию uses основного модуля, добавив туда ссылку на модуль UnitDop.

Обрабатывая инструкцию uses, компилятор дойдет до ссылки на модуль UnitDop и начнет искать файл UnitDop.dcu. Прежде всего, поиск будет производиться в папке, где расположен проект и форма, но если там модуля нет, то компилятору необходимо подсказать, где искать этот файл.

В этом случае ызовите диалог настройки путей, вызвав функцию главного меню Project→Options, откройте в нем закладку Directories/Conditionals, и в строке Search Path укажите путь к папке, где расположен модуль.

Завершение работы над проектом

Для проверки работоспособности процедуры ввода коэффициентов и функции расчета по формуле, описанной в дополнительном модуле, напишем процедуру обработки события onClick для кнопки «Выполнить расчет. Процедура представлена на рисунке 3.9.

Рисунок 3.29 – Главная процедура с вызовом вспомогательной процедуры и функции

Исследование созданного приложения

6. Анализ передачи параметров по наименованию

Настройте режим пошагового выполнения процедуры для вычисления корней уравнения и проанализируйте значения коэффициентов уравнения до и после вызова процедуры getKoef.

Уберите префикс var в списке параметров процедуры getKoef и снова проанализируйте значения коэффициентов уравнения до и после вызова процедуры getKoef.

Восстановите заголовок процедуры.

Сделайте вывод и зафиксируйте в отчете.

7. Анализ передачи параметров по значению

Измените функцию расчета по формуле таким образом, чтобы после вычисления результата значения формальных параметров изменялись, например, становились нулями.

Проверьте в пошаговом режиме, будут ли меняться значения фактических параметров после обращения к измененной функции.

Восстановите текст функции.

Сделайте вывод и зафиксируйте в отчете.

Содержание отчета

• Наименование работы.

• Цель работы.

• Краткое описание понятий процедура и функция.

• Перечень возможных вариантов расположения подпрограмм и влияние расположения на видимость подпрограмм.

• Способы передачи параметров в подпрограммы.

• Тексты своих процедур setKoef и getKoef.

• Текст дополнительного модуля для своей формулы.

• Расчетная формула и контрольные примеры.

• Результаты тестирования проекта на контрольных примерах в виде копии экрана с протоколом выполненных расчетов.

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

• Выводы.

Контрольные вопросы

• Что такое процедура. Описание процедуры.

• Что такое функция. Описание функции.

• Варианты расположения подпрограмм и их особенности.

• Что такое область видимости имен и от чего зависит видимость имени.

• Способы передачи параметров в подпрограммы.

• Как создать и использовать дополнительный модуль.

• Написать подпрограмму по заданию преподавателя и рационально расположить ее в приложении.

Рекомендованая литература

1. Культин Н. Delphi 6. Программирование на Object Pascal. – СПб.:БХВ-Петербург,2002.

2. Ставровский А.Б. Турбо Pascal 7.0/ Учебник. – К.: BHV, 2000.

4. Лабораторная работа № 4. Логический тип данных и разветвления в программах

Цели работы:

• Познакомиться с логическим типом данных.

• Познакомиться с логическими операциями.

• Научиться записывать и вычислять логические выражения.

• Познакомиться с инструкциями if … then … else и case … of.

• Ознакомиться с компонентами, которые обеспечивают возможность выбора вариантов.

• Создать приложение, реализующее разветвляющееся алгоритмы.

Краткие теоретические сведения

1. Логический тип данных

Тип Boolean используется для данных, которые могут принимать только два значения – истина и ложь. В языке Object Pascal этим значениям соответствуют константы True и False.

Данные такого типа обычно появляются как результат операций сравнения, и в некоторых других случаях. Например, результатом вычисления выражения 2<3 будет True, а результат вычисления выражения sin(x)>0 может быть и True и False, в зависимости от значения переменной х.

В таблице 4.1 приведены операции сравнения, определенные в языке Object Pascal.

Таблица 4.1 - Операции сравнения
Название операции сравнения	Запись на языке Object Pascal
Меньше	<
Меньше или равно	<=
Больше	>
Больше или равно	>=
Равно	=
Не равно	<>