Язык - 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 (d<>9) and (d<>10) and (d<>11) then

В дельфях есть модуль Math.

Спасибо, это я помню. Но не помню, что в нем есть, чего нет.

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,∞), что заменяется парой условий d<1, d>11, илиd<1 or d>11В синтаксисе языка паскаль: if (d<1) or (d>11) thenЕсли d имеет тип real, выражение не упрощается.