Вычисления значения функции в паскале Telegraph