Динамическая память (первый шаг к современному программированию)

Лабораторная работа 17.1 (линейные однонаправленные списки – не так трудно, как кажется)

 

Пусть имеется линейный однонаправленный список, тип звена которого описан следующим образом:

Type

list = ^node;

node = record

K: integer;

next: List;

end;

 

Написать следующие функции (L – указатель на голову списка, а El – пе­ременная типа integer).

 

1.Функция добавляет El в голову списка.		Function ToHead(l:list; El:integer):list;
2. Функция добавляет El в хвост непустого списка.		Function ToTail(l:list; El:integer):list;
3. Функция определяет длину списка.		Function Length_List(l:list):integer;
4. Функция возвращает число вхождений El в список.		Function Count_El(l:list;El:integer):integer;
5. Функция возвращает ссылку на минимальный элемент списка.		Function Min_List(l:list):list;
6. Функция возвращает ссылку на максимальный элемент списка.		Function Max_List(l:list):list;
7. Функция возвращает значение true, если в списке есть отрица-тельные элементы.		Function Is_Neg(l:list):boolean;
8. Функция возвращает ссылку на элемент, равный El.		Function Find_El(l:list; El:integer):list;
9. Функция удаляет все вхожде-ния El из непустого списка.		Function Del_All_El(l:list; El:integer):list;
10. Функция удаляет все отрица-тельные элементы из непустого списка.		Function Del_All_Neg(l:list):list;
11. Функция возвращает значение true, если список упорядочен по возрастанию.		Function Is_Vozr(l:list):boolean;
12. Функция вставляет El в упоря-доченный по возрастанию список (не нарушая порядка).		Function El_into_VList(l:list; El:integer):list;
13. Функция вставляет El в упоря-доченный по убыванию список (не нарушая порядка).		Function El_into_UList(l:list; El:integer):list;
14. Функция удваивает все эле-менты, равные El (удваивает – т.е. вставляет новый элемент со значением El).		Function Double(l:list; El:integer):list;
15. Функция возвращает значение true, если в списке есть повторя-ющиеся элементы.		Function Is_Double(l:list):boolean;

 

 

Краткий справочник

 

Герона формула.

Герон – выдающийся греческий инженер и математик, живший в г.Александрия в первом веке до н.э. Дал систематическое изложение основных достижений древности в области прикладной механики. Математические работы Герона являются энциклопедией античной прикладной математики.

Формула Герона позволяет вычислить площадь треугольника по трем его сторонам:

P = Ö (P*(P-a)*(P-b)*(P-c)),

где: a, b и c – стороны треугольника,

P – полупериметр (P=(a+b+c)/2).

 

Евклида алгоритм.

Евклид –древнегреческий математик, живший в г.Александрия в третьем веке до н.э. Важнейший труд Евклида «Начала», содержащий изложение планиметрии, стереометрии и некоторых вопросов теории чисел, оказал огромное влияние на развитие математики.

Алгоритм Евклида нахождения наибольшего общего делителя (НОД) неотрицательных целых чисел основан на следующих свойствах этой величины. Пусть m и n – одновременно не равные нулю целые неотрицательные числа и пусть.m³n Тогда, если n=0, то НОД(m,n)=m, а если n¹0, то для чисел m, n и r, где r – остаток от деления m на n, выполняется равенство НОД(m,n)=НОД(n,r). Например, НОД(15,6)=НОД(6,3)=НОД(3,0)=3.

Натуральное число.

Числа 1, 2, 3 и т.д., использующиеся для счета предметов, т.е. це­лые положительные числа, называются натуральными.

 

Палиндром.

Палиндром – это число, которое читается одинаково справа налево и слева направо. Например, числа 1221, 343, 66 – палиндромы.

Понятие палиндром применимо и к тексту. Например, слово «ша­лаш» это тоже палиндром.

 

Прогрессия арифметическая.

Последовательность, каждый член которой, начиная со второго, получен сложением предыдущего члена с некоторым постоянным числом D, называется арифметической прогрессией. Число D – разность прогрессии.

 

Прогрессия геометрическая.

Последовательность, первый член которой отличен от нуля и каж­дый член, начиная со второго, получен умножением предыдущего члена на некоторое постоянное число Q ¹ 0, называется геометрической прогрессией. Число Q – знаменатель прогрессии.

 

Простое число.

Простым называется число, которое делится только на единицу и на само себя.