Question

Язык - 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

Answer 1

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