Лабораторная работа: Структуры и алгоритмы обработки данных

Type

chisla = setof '0'..'9'; {множество}

TE= Integer; {описание целочисленного типа}

WE= String; {описание строкового типа}

PE= ^EL; {описание типа указателя}

EL= Record{описание типа - запись}

inf: TE; {информационная часть элемента, тип Integer}

inf2: WE; {информационная часть элемента, тип String}

next: PE{адресная часть элемента}

End;

Var

Sag, {указатель начала списка}

q, qq: PE; {переменные указателей}

oper, st, st2: TE; {переменные целочисленного типа}

w, stroka: WE; {переменные строкового типа}

ОПИСАНИЕ ПОЛЬЗОВАТЕЛЬСКОГО ИНТЕРФЕЙСА

Начальный вид окна программы.

Для начала ввода данных в ЛОС, надо определиться с каким типом данных Вы хотели бы работать. После того, как Вы решили с каким типом данных Вы будете дальше работать, Вам нужно ввести номер варианта дальнейшей работы (1 или 2).

Для выполнения условий данной лабораторной, выбираем тип Integer (тип целочисленный) предел его от -32768 до 32767.

Далее, осуществляется ввод самого списка. Создается линейный односвязный список, с указанием на конец списка (NIL) и по мере ввода данных, ЛОС наполняется, при этом идет сортировка значений элементов по возрастанию.

После ввода необходимого количества элементов и ввода нулевого значения, созданный и отсортированный ЛОС выводиться на экран. (Рис.2)

Далее, следуя указаниям программы, пользователь нажимает Enter для продолжения работы программы, и на экран выводиться перечень возможных вариантов работы в данной программе.(Рис.3)

После выбора нужного номера операции, для выполнения условий нашей задачи, выбираем (11 - Удалить первый и последний элементы ЛОС) и нажимаем на Enter. Происходит удаление первого и последнего элементов ЛОС, с выводом на экран итогового вида ЛОС.(Рис.4)

Видно, что с поставленной задачей наша программа справилась. Были удалены первый и последний элементы ЛОС, а потом был выведен итоговый вид ЛОС.

ЛИСТИНГ ПРОГРАММЫ

Type

chisla = setof '0'..'9'; //множество

TE= Integer; //описание целочисленного типа

WE= String; //описание строкового типа

PE= ^EL; //тип указателя