помогите пожалуйста

[kolek_96]

Ребята, напишите прогу в паскале пожалуйста
Составить программу, которая содержит две функции: для вычисления котангенса
ctg(x) и обратной к ней функции арккотангенса arcctg(x). Составить процедуру, которая
получает в качестве параметра значение аргумента x и возвращает значения
x1=arcctg(ctg(x)) и x2=ctg(arcctg(x)), вычисленные с использованием двух введенных
функций.
Вызвать данную процедуру из тела основной программы для нескольких значений
аргумента x. Для каждого такого вызова программа должна определять, какое из
вычисленных значений (x1 или x2) ближе к исходному значению x.