 |
Программирование данных типа «запись».
|
|
|
|
Цель: научиться составлять программы с использованием структурированного типа данных в программе Pascal.
Теоретические сведения:
Комбинированный тип данных — это структурированный тип, состоящий из фиксированного числа компонент (полей) разного типа. Комбинированный тип имеет еще и другое название — запись.
Обычно запись содержит совокупность разнотипных атрибутов, относящихся к одному объекту. В Паскале эта информация может храниться в одной переменной типа Record (запись).
К каждому элементу записи можно обратиться, используя составное имя, которое имеет следующую структуру: <имя переменной>.<имя поля>.
В программе могут использоваться массивы записей.
Любая обработка записей, в том числе ввод и вывод, производится поэлементно.
Осуществлять доступ к полям записи можно с помощью оператора присоединения. Его общий вид: With <имя записи> Do <оператор>. Внутри оператора к компонентам записи можно обращаться только с помощью имени соответствующего поля.
Элементы файла пронумерованы в порядке их занесения в файл, начиная с нуля. Задав номер элемента файла, можно непосредственно установить на него указатель. После этого можно читать или перезаписывать данный элемент. Установка указателя на нужный элемент файла производится процедурой Seek(FV,n). Здесь FV — имя файловой переменной, n — порядковый номер элемента.
Порядок выполнения работы:
1) Запустите программу Pascal.
2) Создать программу "Телефонный справочник". Справочник содержит следующую информацию: Ф.И.О. абонента, домашний адрес, номер телефона. Программа осуществляет поиск номера телефона по фамилии, по имени и отчеству абонента. Откомпилируйте программу. Проверьте правильность решения задачи.
|
|
|
3) Для каждого из 25 студентов группы известны фамилия и оценка (в баллах) по пяти дисциплинам. Требуется вычислить среднюю оценку каждого студента и выбрать человека, имеющего максимальный средний балл. Откомпилируйте программу. Проверьте правильность решения задачи.
4) Ввести сегодняшнюю дату следующим образом: Первая цифра - это число, вторая - месяц, третья – год. Определить дату завтрашнего дня. Откомпилируйте программу. Проверьте правильность решения задачи.
5) Запишите полученные результаты в тетрадь. Оформите отчет о проделанной работе, который должен содержать тему, цель работы, формулировки задач с решениями.
6) Выйдите из программы Pascal.
Лабораторная работа №18
Программирование модулей.
Цель: научиться составлять программы с использованием модулей в программе Pascal.
Теоретические сведения:
Модуль — это набор ресурсов (функций, процедур, констант, переменных, типов и т.д.), разрабатываемых и хранимых независимо от использующих их программ. Модуль может содержать достаточно большой набор процедур и функций, а также других ресурсов для разработки программ. Существуют стандартные модули Паскаля (system, crt, graph и т.д.).
Модуль имеет следующую структуру:
Unit <имя модуля>; {заголовок модуля}
Interface {интерфейсная часть}
Implementation {раздел реализации}
Begin
{раздел инициализации модуля}
End.
После служебного слова Unit записывается имя модуля, которое должно совпадать с именем файла, содержащего данный модуль.
В разделе Interface объявляются все ресурсы, которые будут в дальнейшем доступны программисту при подключении модуля.
В разделе Implementation описываются все подпрограммы, которые были ранее объявлены. Кроме того, в нем могут содержаться свои константы, переменные, типы, подпрограммы и т.д., которые носят вспомогательный характер и используются для написания основных подпрограмм. В отличие от ресурсов, объявленных в разделе Interface, все, что дополнительно объявляется в Implementation, уже не будет доступно при подключении модуля. При описании основной подпрограммы достаточно указать ее имя, а затем записать тело подпрограммы.
|
|
|
Раздел инициализации содержит операторы, которые должны быть выполнены сразу же после запуска программы, использующей модуль.
Порядок выполнения работы:
1) Запустите программу Pascal.
2) Создать программу: Реализовать в виде модуля набор подпрограмм для выполнения следующих операций над обыкновенными дробями вида P/Q (Р — целое, Q — натуральное):
1) сложение; 2) вычитание; 3) умножение; 4) деление; 5) сокращение дроби;
5) возведение дроби в степень TV (7V — натуральное);
6) функции, реализующие операции отношения (равно, не равно, больше или равно, меньше или равно, больше, меньше).
Дробь представить следующим типом: Type Frac =Record
Р: Integer;
Q: 1..32767; End;
Используя этот модуль, решить задачу:
1. Дан массив А, элементы которого — обыкновенные дроби. Найти сумму всех элементов и их среднее арифметическое; результаты представить в виде несократимых дробей.
2. *Дан массив А, элементы которого — обыкновенные дроби. Отсортировать его в порядке возрастания.
Откомпилируйте программу. Проверьте правильность решения задачи.
3) Создать программу: Реализовать в виде модуля набор подпрограмм для выполнения следующих операций над векторами:
1) сложения;
2) вычитания;
3) скалярного умножения векторов;
4) умножения вектора на число;
5) нахождения длины вектора.
Вектор представить следующим типом:
Type Vektor =Record
X, Y: Real;
End;
Используя этот модуль, решить задачу:
Дан массив А — массив векторов. Отсортировать его в порядке убывания длин векторов.
Откомпилируйте программу. Проверьте правильность решения задачи.
4) Запишите полученные результаты в тетрадь. Оформите отчет о проделанной работе, который должен содержать тему, цель работы, формулировки задач с решениями.
5) Выйдите из программы Pascal.
|
|
|
