Операции многократной точности (операции с длинными числами)

Все длинные числа представляются в виде строки, каждый элемент которой - цифра.Такая форма ведения уравнения нужна для удобства вычисления длинных формул.Где S - константа либо вычисляемое значение.(str:string) :string; - делит число str на 2.(z:integer) ; - процедура для вычисления значения выражения.Z - номер вычисляемого значения в массиве mas.(a:integer;var xx:string) :string; - умножение числа хх на цифру а. Используется в функции umnozen.(a,b:string) :shortint; - сравнивает число a с числом b. Возвращается результат.If ((b [1] ='-') and (a [1] ='-')) then begin.If po_ch_num (mas [z] .lin [zz+1] ,tmp) then mas [z] .lin [zz+1] :=tmp.