точное значение

[a999a1]

Составить программу вычисления точного значения n^n, где n > 10.
имеется рабочий код но нужно что бы в ответе выдавалось точное значение. задача из длинной арифметики

var n : real;
begin
  repeat
    write('n = ');
    readln(n);
  until n > 10;
  writeln('n^n = ', power(n, n))
end.

[Unique_Maks]

что значит "точное значение"?

[a999a1]

ну допустим вы вводим число 21 и в ответе выдает 5.84258701838598E27. а мне надо что бы он полностью все число выдавал без буквы Е. должно по идее быть длинно число

[type_Oleg]

В Паскале самый крутой из " точных " типов - LongWord, это всего 4294967295, больше 9^9, но меньше 10^10.

А каково максимальное n может быть?
Например, 100^100 - это 200-значное число.
Определитесь с максимальным n, и создайте свой тип, например

type tSuperNumber = record
 razrStar,razrMlad:LongWord;
end;

Этот тип - уже до 16^16.
И т.д.
Надо будет еще функцию возведения в степень свою написать вместо power.