Реализовать набор подпрограмм для работы с длинными действительными числами (числами, выходящими за диапазон допустимых значений любого действительных типа или не представленных в памяти ЭВМ): 1) сложение; 2) вычитание; 3) умножение; 4) нахождение частного от деления одного числа на другое с заданным количеством знаков после запятой; 5) функции, реализующие операции отношения (равно, не равно, больше или равно, меньше или равно, больше, меньше); 6) тригонометрические функции, где аргументом и значениями являются длинные действительные числа (указание: использовать разложение соответствующей функции в ряд).
Длинное действительное число представить следующим типом:

          Type Tsifra = 0..9; Chislo = Array [1..1000] Of Tsifra;
          LongReal = Record
                       Znak : 0..1; {0 - "плюс", 1 - "минус"}
                       Ts, Dr : Chislo {целая и дробная части}
                     End;

---

---