Язык - 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. if (d11)

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, выражение не упрощается.