Длинная арифметика. Pascal, Delphi.

Бороздя просторы интернета, заметил, что многие ничего не знают о реализации длинной арифметики.

:
Прошу помочь найти способ возвести в степень 2^n, причём n>10^20. Много чего перепробовал, но найти какой-то рациональний способ так и не смог.

Причем на том форуме никто так и не помог решить данную задачу.
На самом деле все делается довольно просто.
Для решения задач пободного типа используется длинная арифметика.
Например, дано число 10^20, нужно прибавить 10^30. Понятно, что обычными паскалевскими процедурами тут ничего не сделаешь. Тут нам поможет длинная арифметика.
Как ее реализовать? Мы будем представлять числа в виде массива.
В 0 элементе массива будет хранится длина числа.
В каждом элемента хранится одинаковое количество цифр, например по 3(назовем это число константой baselen).
Предположим, дано число 123456789. Количество цифр в каждом элементе 3.
Для удобства при разных операциях с числами мы будем записывать их задом наперед.
То есть наш массив: [789][456][123]. Это число 123456789 в представлении компьютера.

Не забываем про нулевой элемент, в котором хранится длина. В данном случае 3.
Числа записываются именно таким образом, потому что существует много нюансов, описывать которые очень долго.

Код:


Const base = 1000
      baselen = 3;
Type
  TLong = array[0..MaxN] of integer;


Вот и все описание данного типа.

Потихоньку буду выкладывать процедуры, выполняемые с такими числами.