Пр.раб.№17.Программирование ветвящихся алгоритмов в Delphi

Практическая работа № 17
Программирование алгоритмов ветвящейся структуры в Delphi

Цель работы:
Изучить структуру простого проекта на языке Delphi.
Усвоить применение инструкции IF.

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

Приложение (проект) Delphi представляет собой набор программных единиц – модулей. Любое приложение Delphi включает в свой состав следующие основные модули (файлы с указанными ниже расширениями):
Файл .Dpr – это файл главной программы проекта (файл проекта).
Файл .Pas – это исходные Pascal-коды модулей, разрабатываемые программистами.
Файл .Dfm – файл описания формы – содержит данные о свойствах формы и компонентов, включенных в форму.
Файл .Res – файлы содержит скомпилированные специальным образом файлы ресурсов. Примерами таких файлов могут быть ресурсы, содержащие рисунки, национальные заменяющие тексты и т. д.
Файл .Dcu – содержит объектный код .pas-модулей, т. е. откомпилированный модуль.
Файл .Exe – это готовая к запуску программа (загрузочный модуль).
Файлы .~* – файл с именем, заканчивающимся на .~*, представляет собой резервную копию модифицированного или сохраняемого файла.

Главный модуль (файл проекта) содержит инструкции, с которых начинается выполнение программы. Главный модуль приложения формируется автоматически системой Delphi и хранится в файле с расширением dpr.
Начинается главный модуль словом program, за которым следует имя программы, совпадающее с именем проекта. Имя программы задаётся программистом в момент сохранения файла проекта, и оно определяет имя исполняемого файла программы.
Далее, за словом uses следуют имена используемых модулей: библиотечного модуля forms и модуля формы.
Выполняемая часть главного модуля находится между инструкциями begin и end.

В Delphi каждой форме соответствует свой модуль. Начинается модуль со слова unit за которым следует имя модуля. Состоит модуль из трёх разделов: интерфейса, реализации и инициализации.
Раздел интерфейса (начинается словом interface). Здесь перечислены используемые модулем другие библиотечные модули и находится сформированное Delphi описания формы (типа), которое следует за словом Type.
Раздел реализации (начинается словом implementation) содержит объявление локальных переменных, процедур и функций.
Раздел инициализации позволяет выполнить инициализацию переменных модуля. Инструкции раздела инициализации располагаются после раздела реализации между begin и end. Если раздел инициализации не содержит инструкций, то слово begin не указывается.

Условный оператор If
Выбор действий в зависимости от выполнения условия может быть реализован при помощи инструкции if. Записывается инструкция так:
If условие Then
Begin
{инструкции, которые надо выполнить,
если условие выполняется, истинно}
End
Else
Begin
{инструкции, которые надо выполнить,
если условие не выполняется, ложно.}
End;
Инструкция If выполняется следующим образом:
Вычисляется значения условия (условие – это выражение, значение которого может быть равно true или false).
Если условие выполняется (значение выражения условие равно true ), то выполняются инструкции следующие за словом then, находящиеся между begin и end. Если условие не выполняется (значение выражения условие равно false ), то выполняются инструкции следующие за словом else (находящимся между begin и end).

Подготовка к практической работе:
изучить конспект по теме «Структура проекта Delphi».
изучить конспект по теме «Основы языка программирования Object Pascal»;
изучить краткие теоретические сведения данной работы;
ответить на контрольные вопросы.

Контрольные вопросы (допуск к работе):
Какие файлы составляют приложение Delphi?
Какой модуль приложения Delphi является главным?
Как формируется файл проекта?
Какова структура файла проекта Delphi?
Какова структура файла исходного модуля Delphi?

Задание 1.
Создать программу вычисления значения функции: 13 EMBED Equation.3 1415 .

Порядок выполнения работы
Загрузите систему Delphi.
Создайте новый проект.
Сохраните Ваш еще пустой проект в отдельную папку.
С помощью стандартных средств Windows (Проводник) найдите эту папку на диске и убедитесь в том, что ваш проект содержит более одного файла. (Как, например, показано на рис.1.)
Рис.1.
Вернитесь в визуальную среду программирования.
Разработайте программу для расчета функции:

13 EMBED Equation.3 1415,

аналогичную программе из практической работе №1. (В прошлой практической работе Вы программировали линейный алгоритм, а сейчас вы ознакомитесь с простейшим случаем ветвящегося алгоритма).
В обработчик события OnClick для кнопки “Рассчитать” внесите следующий код:
procedure TForm1.Button2Click(Sender: TObject);
var x,y:real;
begin
x:=StrToFloat(form1.Edit1.text);
if х<=0 then
y:=x*x
else y:=x*x*x;
form1.Label1.Caption:=FloatToStr(y);
end;
Полужирным шрифтом здесь выделены те строчки, которые вы пишете вручную.
Сохраните проект, запустите его на исполнение и ознакомьтесь с работой программы.

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

Варианты заданий:

13 EMBED Equation.3 1415
13 EMBED Equation.3 1415
13 EMBED Equation.3 1415
13 EMBED Equation.3 1415
13 EMBED Equation.3 1415
13 EMBED Equation.3 1415
13 EMBED Equation.3 1415
13 EMBED Equation.3 1415
13 EMBED Equation.3 1415
13 EMBED Equation.3 1415
13 EMBED Equation.3 1415
13 EMBED Equation.3 1415
13 EMBED Equation.3 1415
13 EMBED Equation.3 1415
13 EMBED Equation.3 1415
13 EMBED Equation.3 1415
13 EMBED Equation.3 1415
13 EMBED Equation.3 1415
13 EMBED Equation.3 1415
13 EMBED Equation.3 1415
13 EMBED Equation.3 1415
13 EMBED Equation.3 1415
13 EMBED Equation.3 1415
13 EMBED Equation.3 1415
13 EMBED Equation.3 1415
13 EMBED Equation.3 1415
13 EMBED Equation.3 1415
13 EMBED Equation.3 1415
13 EMBED Equation.3 1415
13 EMBED Equation.3 1415
13 EMBED Equation.3 1415
13 EMBED Equation.3 1415

Содержание отчета:
Постановка задачи
Тексты процедур – обработчиков событий, разработанных в приложении Delphi

Контрольные вопросы:
Как сохраняется приложение Delphi?
Какие файлы проекта создаются программистом?
Какие файлы проекта создаются автоматически?
Какое имя получает файл описания формы?
С помощью какой функции на экран выводится диалоговое окно с сообщением?












ОАиП (2 курс) Занятие 65
Практическая работа №31(1). Линейные программы в Delphi 13 PAGE 14415 / 13 NUMPAGES 14715





Root EntryEquation NativeEquation NativeEquation NativeEquation NativeEquation NativeEquation NativeEquation NativeEquation NativeEquation NativeEquation NativeEquation NativeEquation NativeEquation NativeEquation NativeEquation NativeEquation NativeEquation NativeEquation NativeEquation NativeEquation NativeEquation Native

Приложенные файлы

  • doc 22980752
    Размер файла: 109 kB Загрузок: 0

Добавить комментарий