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

WriteLn('');

WriteLn(rus('ВашитоговыйЛОС:'));

print(sag); //вывод ЛОС на экран

WriteLn(' ');

ifst2=1 then //если ЛОС наполняется первый раз

Gou(w); {процедура перемещения между

процедурами}

End;

Procedure Vopros ( w: WE); {процедура вывода списка вариантов дальнейших вариантов работы в ЛОС}

Begin

WriteLn(rus('___________________________________________'));

WriteLn(rus('Что Вы хотите выполнить дальше?'));

WriteLn('');

WriteLn(rus('2 - Добавить элемент в начало списка'));

Write(rus('3 - Добавить элемент в середину списка, перед указанным ‘));

WriteLn(rus('значением'));

Write(rus('4 - Добавить элемент в середину списка, после указанного ‘));

WriteLn(rus('значения'));

WriteLn(rus('5 - Добавить элемент в конец списка'));

WriteLn(rus(''));

WriteLn(rus('6 - Удалить элемент в начале списка'));

Write(rus('7 - Удалить элемент ЛОС стоящий перед указанным ‘));

WriteLn(rus('значением списка'));

Write(rus('8 - Удалить элемент ЛОС стоящий после указанного “));

WriteLn(rus('значения списка'));

WriteLn(rus('9 - Удалить определенный элемент в списке'));

WriteLn(rus('10 - Удалить элемент в конце списка'));

WriteLn(rus('11 - Удалить первый и последний элементы ЛОС'));

WriteLn('');