Книги по всем темам

if St = Beg_Spis then begin { Вставка в начало списка} New(St); { Выделение новой ячейки динамической области памяти для добавляемой записи} St^.Ukaz := Beg_Spis; {Изменение ссылки в первом элементе списка} Beg_Spis := St; { Установка нового адреса начала линейного списка} St^.Info := Ins_Zap; { Заполнение информационного поле нового элемента списка} end else begin { Вставка в произвольное место} New( St );

St^.Ukaz := Sp^.Ukaz;

Sp^.Ukaz := St;

St^.Info := Ins_Zap;

end;

end; Sp := St;

St := St^.Ukaz; {Переход к следующему элементу} end; { Цикл по элементам линейного списка} If Key_Insert = False then { Вставка в конец линейного списка} begin New( St );

Sp^.Ukaz := St;

St^.Ukaz := Nil;

St^.Info := Ins_Zap;

end;

End; { Цикл по добавляемым записям} End; { Конец процедуры добавления } { Главная программа } BEGIN INPUT_AND_FORM_SPIS;

OUTPUT_SPIS;

DELETE_ELEM_SPIS;

OUTPUT_SPIS;

SORT_ELEM_SPIS;

OUTPUT_SPIS;

ADD_ELEM_SPIS;

OUTPUT_SPIS;

END.

Порядок выполнения работы 1. Получить вариант задания у преподавателя.

2. Определить состав и структуру входной и выходной информации.

3. Выделить глобальные переменные и описать их.

4. Разработать структуру программы.

5. Каждую функционально-законченную часть оформить в виде отдельной подпрограммы.

6. Отладить программу и продемонстрировать её работу преподавателю.

7. Оформить и сдать отчет.

Типовое задание Создать текстовый файл, состоящий из записей, имеющих заданную структуру (см. ваш вариант).

Написать программу, решающую следующие задачи:

1) Занесение записей из текстового файла в линейный список.

2) Вывод на экран сформированного линейного списка.

3) Поиск в линейном списке и вывод на экран записей по заданному полю.

4) Удаление из списка записей в соответствии с заданием.

5) Вывод на экран оставшегося линейного списка.

6) Упорядочение линейного списка по заданному полю.

7) Вывод упорядоченного списка на экран.

8) Вставка записей в линейный список.

9) Вывод окончательного списка на экран и запись его в новый файл.

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

Варианты заданий Вариант Номер Фамилия имя отчество Дата рождения целое строка - 20 символов число месяц год Поиск и вывод на экран записей о всех людях, родившихся в мае 1975 года.

Удаление из списка записей о родившихся в январе 1973 года.

Упорядочение линейного списка по возрастанию года рождения.

Вставка записей в список без нарушения упорядочения по году рождения.

Вариант Номер Личный шифр Фамилия Дата рождения п/п студента имя, отчество число месяц год число 5 символов 25 символов Поиск в линейном списке и вывод на экран записей о всех студентах, имеющих шифр “А001”.

Удаление из списка записей о студентах, имеющих шифр “С001”.

Упорядочение линейного списка по убыванию года рождения.

Вставка записей в список без нарушения упорядочения по году рождения.

Вариант Номер Фамилия Табельный Размер п/п имя отчество номер пособия число строка символов строка символов вещественное число Поиск в линейном списке и вывод на экран записей о всех клиентах, имеющих табельный номер, начинающийся с символа “С”.

Удаление из списка записей о клиентах с табельным номером, начинающимся с символа “Р”.

Упорядочение линейного списка по возрастанию размера пособия.

Вставка записей в список без нарушения упорядочения.

Вариант Номер Фамилия имя отчество Шифр Год п/п специальности рождения число строка символов строка символов целое число Поиск в линейном списке и вывод на экран записей о всех студентах, имеющих шифр, начинающийся с символа “В”.

Удаление из списка записей о студентах с шифром, начинающимся с символа “С”.

Упорядочение линейного списка по возрастанию года рождения.

Вставка записей в список без нарушения упорядочения.

Вариант Номер Фамилия имя отчество Факультет Номер п/п специальности число строка символов строка символов целое от 1 до Поиск в линейном списке и вывод на экран записей о всех студентах факультета “ФВТ”.

Удаление из списка записей о студентах факультета “ПСФ”.

Упорядочение линейного списка по возрастанию номера специальности.

Вставка записей в список без нарушения упорядочения.

Вариант Номер Фамилия имя отчество Факультет Шифр п/п специальности число строка символов 6 символов 8 символов Поиск в линейном списке и вывод на экран записей о всех студентах факультета “ФАИТ”.

Удаление из списка записей о студентах факультета “ФВТ”.

Упорядочение линейного списка по убыванию шифра специальности.

Вставка записей в список без нарушения упорядочения.

Вариант Номер Фамилия имя отчество Дата рождения Пол п/п число месяц год “жен”/ “муж” число строка символов 3 символа Поиск в линейном списке и вывод на экран записей о всех студентках.

Удаление из списка записей о студентах мужского пола.

Упорядочение линейного списка по возрастанию года рождения.

Вставка записей в список без нарушения упорядочения по году рождения.

Вариант Фамилия имя отчество автора Название книги Год издания строка символов строка символов число Поиск в линейном списке и вывод на экран записей о всех книгах, изданных в 1975 году.

Удаление из списка записей о книгах, фамилии авторов которых, начинаются на букву “А”.

Упорядочение линейного списка по возрастанию года издания.

Вставка записей в список без нарушения упорядочения по году издания.

Вариант Фамилия имя отчество автора Название книги Год издания строка символов строка символов число Поиск в линейном списке и вывод на экран записей о всех книгах, изданных до 1985 года.

Удаление из списка записей о книгах, с фамилией автора “Иванов”.

Упорядочение линейного списка по убыванию года издания.

Вставка записей в список без нарушения упорядочения по году издания.

Вариант Номер Фамилия имя отчество Табельный Размер п/п номер стипендии число 20 символов 6 символов целое число Поиск в линейном списке и вывод на экран записей о всех студентах, имеющих табельный номер, начинающийся с символа “A”.

Удаление из списка записей о студентах с табельным номером, начинающимся с символа “B”.

Упорядочение линейного списка по убыванию размера стипендии.

Вставка записей в список без нарушения упорядочения.

Вариант код товара наименование товара цена количество число 30 символов число число Поиск в линейном списке и вывод на экран записей о товарах, количество которых равно нулю.

Удаление из списка этих записей.

Упорядочение линейного списка по возрастанию кодов товаров.

Вставка записей в список без нарушения упорядочения по коду товара.

Вариант код предприятия название кол-во месяц оплаты предприятия электроэнергии число 15 символов число число Поиск в линейном списке и вывод на экран записей о всех предприятиях, месяц оплаты которых меньше текущего.

Удаление из списка записей о предприятиях, месяц оплаты которых равен текущему.

Упорядочение линейного списка по убыванию кодов предприятий.

Вставка записей в список без нарушения упорядочения данных о новом предприятии.

Вариант код пациента номер страхового полиса организация число 8 символов 20 символов Поиск в линейном списке и вывод на экран записей о всех пациентах данной организации.

Удаление из списка записи с данным номером страхового полиса.

Упорядочение линейного списка по возрастанию кодов пациентов.

Вставка записей в список без нарушения упорядочения данных о новых пациентах.

Вариант Ф.И.О. больного адрес больного номер участка дата выписки 30 символов 20 символов число число-месяц Поиск в линейном списке и вывод на экран записей о всех больных на данном участке.

Удаление из списка записей о больных, выписанных в прошлом месяце.

Упорядочение линейного списка по алфавиту (по полю ФИО).

Вставка записей в список без нарушения упорядочения по фамилии больного.

Вариант код линии метро название кол-во станций протяжённость линии число символы число действ. число Поиск в линейном списке и вывод на экран записей о Кольцевой линии метро.

Удаление из списка записей о линии, имеющей наименьшее количество станций.

Упорядочение линейного списка по убыванию кода линии метро.

Вставка записей в список без нарушения упорядочения о новой линии метро.

Вариант номер дома номер квартиры квартплата Ф.И.О. квартиросъёмщ.

число число действ. число 30 символов Поиск в линейном списке и вывод на экран записей о всех квартирах дома №5.

Удаление из списка записей о кварторосъёмщике с фамилией “Иванов”.

Упорядочение линейного списка по возрастанию номеров домов.

Вставка записей в список без нарушения упорядочения номеру дома.

Вариант Ф.И.О. квартиросъёмщ. жилая площадь кол-во жильцов 30 символов действ. число число Поиск в линейном списке и вывод на экран записей о всех жильцах, жилая площадь которых превышает 100 м2.

Удаление из списка записей о квартиросъёмщиках с фамилией “Иванов”.

Упорядочение линейного списка по убыванию количества жильцов.

Вставка записей в список без нарушения упорядочения по числу жильцов.

Вариант табельн. номер Ф.И.О. разряд зарплата число 30 символов число действ. число Поиск в линейном списке и вывод на экран записей о всех сотрудниках, имеющих 10 разряд.

Удаление из списка записей о сотрудниках, фамилии которых начинаются с буквы “И”.

Упорядочение линейного списка по возрастанию табельных номеров.

Вставка записей в список без нарушения упорядочения.

Вариант номер цеха табельный номер Ф.И.О. отраб.время число число 30 символов число Поиск в линейном списке и вывод на экран записей о всех сотрудниках цеха.

Удаление из списка записей о сотрудниках, чьё отработанное время равно нулю.

Упорядочение линейного списка по убыванию номера подразделения.

Вставка записей в список без нарушения упорядочения о новых сотрудниках.

Вариант номер чит.билета Ф.И.О. дата выдачи книги дата возврата число 30 символов Поиск в линейном списке и вывод на экран записей о всех читателях, которые не возвратили взятые в библиотеке книги на текущую дату.

Удаление из списка записей о читателях фамилии которых начинаются с буквы “И”.

Упорядочение линейного списка по возрастанию номеров читательских билетов.

Вставка записей в список без нарушения упорядочения новых абонентов.

Литература 1. В.Э. Фигурнов IBM для пользователя. М. : Финансы и статистика,2. Д.В. Офицеров, В.А. Старых Программирование в интегрированной среде Турбо Паскаля. Справочное пособие. - Минск: “Беларусь”, 3. В.В. Фаронов Турбо Паскаль 7.0. Начальный курс. Учебное пособие. - М.: “Нолидж”, 4. Вирт Н. Алгоритмы + структуры данных = программы.- М.:

Мир, 5. Вирт Н. Алгоритмы и структуры данных. М.: Мир, Содержание Стр.

1. Работа с файлами................. 1.1. Файлы и их виды в Турбо Паскале.......... 1.2. Доступ к файлам................. 1.3. Лабораторная работа № 1 Текстовые файлы....... 1.4. Лабораторная работа № 2 Типизированные файлы.... 2. Разработка программ с использованием динамической памяти. 2.1. Динамические переменные............ 2.2.Cтандартные процедуры и функции для работы с динамическими переменными............ 2.3. Динамические структуры данных и их описание в Турбо Паскале 2.4. Лабораторная работа №3 Линейный динамический список.. Литература....................

Книги по всем темам

наверх