Записи с меткой «Паскаль»

Решаем задачи Абрамян на Паскале. Pointer51

Pointer51. Даны два непустых двусвязных списка и связанные с ними указатели: $$P_A$$ и $$P_B$$ указывают на первый и последний элементы первого списка, $$P_C$$ — на один из элементов второго. Объединить исходные списки, поместив все элементы первого списка (в том же порядке) перед данным элементом второго списка, и вывести указатели на первый и последний элементы объединенного …

Решаем задачи Абрамян на Паскале. Pointer50

Pointer50. Дан указатель $$P_1$$ на первый элемент непустого двусвязного списка. Перегруппировать его элементы, переместив все элементы с нечетными значениями в конец списка (в том же порядке) и вывести указатель на первый элемент преобразованного списка. Операции выделения и освобождения памяти не использовать, поля Data не изменять.

Решаем задачи Абрамян на Паскале. Pointer49

Pointer49. Дан указатель $$P_1$$ на первый элемент непустого двусвязного списка. Перегруппировать его элементы, переместив все элементы с нечетными номерами в конец списка (в том же порядке) и вывести указатель на первый элемент преобразованного списка. Операции выделения и освобождения памяти не использовать, поля Data не изменять.

Решаем задачи Абрамян на Паскале. Pointer48

Pointer48. Даны указатели $$P_X$$ и $$P_Y$$ на два различных элемента двусвязного списка (элемент с адресом $$P_X$$ находится в списке перед элементом с адресом $$P_Y$$, но не обязательно рядом с ним). Поменять местами данные элементы и вывести указатель на первый элемент преобразованного списка. Операции выделения и освобождения памяти не использовать, поля Data не изменять.

Решаем задачи Абрамян на Паскале. Pointer47

Pointer47. Дано число $$K$$ $$(>0)$$ и указатель $$P_0$$ на один из элементов непустого двусвязного списка. Переместить в списке данный элемент на $$K$$ позиций назад (если перед данным элементом находится менее $$K$$ элементов, то переместить его в начало списка). Вывести указатели на первый и последний элементы преобразованного списка. Операции выделения и освобождения памяти не использовать, поля …

Решаем задачи Абрамян на Паскале. Pointer46

Pointer46. Дано число $$K$$ $$(>0)$$ и указатель $$P_0$$ на один из элементов непустого двусвязного списка. Переместить в списке данный элемент на $$K$$ позиций вперед (если после данного элемента находится менее $$K$$ элементов, то переместить его в конец списка). Вывести указатели на первый и последний элементы преобразованного списка. Операции выделения и освобождения памяти не использовать, поля …

Решаем задачи Абрамян на Паскале. Pointer45

Pointer45. Дан указатель $$P_0$$ на один из элементов непустого двусвязного списка. Переместить данный элемент в начало списка и вывести указатели на первый и последний элементы преобразованного списка. Операции выделения и освобождения памяти не использовать, поля Data не изменять.

Решаем задачи Абрамян на Паскале. Pointer44

Pointer44. Дан указатель $$P_0$$ на один из элементов непустого двусвязного списка. Переместить данный элемент в конец списка и вывести указатели на первый и последний элементы преобразованного списка. Операции выделения и освобождения памяти не использовать, поля Data не изменять.

Решаем задачи Абрамян на Паскале. Param70

Param70. Используя типы TPoint, TTriangle и функцию Area (см. задания Param64-Param66), описать функцию AreaN($$P$$, $$N$$) вещественного типа, находящую площадь выпуклого N-угольника, вершины которого (в порядке их обхода) передаются в массиве $$p$$ размера $$N$$ $$(>2)$$ с элементами типа TPoint. С помощью этой функции найти площади трех многоугольников, если дано число их сторон и координаты их вершин.

Решаем задачи Абрамян на Паскале. Pointer43

Pointer43. Дан указатель $$P_1$$ на первый элемент непустого двусвязного списка. Удалить из списка все элементы с нечетными значениями и вывести указатель на первый элемент преобразованного списка (если в результате удаления элементов список окажется пустым, то вывести $$nil$$). После удаления элементов из списка освобождать память, которую они занимали.