Язык - Pascal

1) Есть ли в нем функция котангенса, или надо выражать самому, как 1/tan?

2) Можно ли эту строчку кода как-то упростить?

if (d 1) and (d 2) and (d 3) and (d 4) and (d 5) and (d 6) and (d 7) and (d9) and (d10) and (d11) then

1) Нет котангенса ни в одной из реализаций паскаля (вот за Дельфи только не скажу, нет у меня её).

2) Выражение

d≠1 & d≠2 & d≠3 & d≠4 & d≠5 & d≠6 & d≠7 & d≠8 & d≠9 & d≠10 & d≠11,

если d - целочисленная переменная, можно упростить. Оно говорит, что d не входит в интервал целых чисел от 1 до 11, т. е. d ∉ [1; 11].

Но тогда d ∈ [ - ∞; 1), (11,∞), что заменяется парой условий d11, или

d11

В синтаксисе языка паскаль: if (d11) then

Если d имеет тип real, выражение не упрощается.

1. Самому.

2. if (d11)