Записи с меткой «Изучение»

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

Param65. Используя тип TPoint и функцию Leng (см. задание Param64), описать тип TTriangle — запись с полями $$A$$, $$B$$, $$C$$ типа TPoint (вершины треугольника) — и функцию Perim($$T$$) вещественного типа, находящую периметр треугольника $$T$$ ($$T$$ — параметр типа TTriangle). С помощью этой функции найти периметры треугольников $$ABC$$, $$ABD$$, $$ACD$$, если даны координаты точек $$A$$, $$B$$, …

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

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

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

Param64. Описать тип TPoint — запись с полями вещественного типа $$X$$ и $$Y$$ (координаты точки на плоскости) — и функцию Leng($$A$$, $$B$$) вещественного типа, находящую длину отрезка $$AB$$ на плоскости по координатам его концов: $$|AB|=\sqrt{(A.X-B.X)^2+(A.Y-B.Y)^2}$$ . ($$A$$ и $$B$$ — параметры типа TPoint). С помощью этой функции найти длины отрезков $$AB$$, $$AC$$, $$AD$$, если даны …

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

Param63. Используя тип TDate и функции DaysInMonth и CheckDate (см. задания Param59-Param61), описать процедуру NexTDate(DD) с параметром типа TDate, которая преобразует дату DD к следующей дате (если дата DDявляется неправильной, то она не изменяется). Запись DD является входным и выходным параметром. Применить процедуру NexTDate к пяти данным датам.

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

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