так как же возвести отрицательное число в в степень(целое число)? то что в faq- возведение (-1) в степень, а если переделывать то разъясните что происходит тут-> minusOnePower := (1 - 2*Byte(Odd(n))), не гневайтесь если что, создал эту тему, т.к. нигде не нашел вразумительного ответа(для себя).

Пользуйся библиотечной функцией Power. К примеру:
ShowMessage(IntToStr(Trunc(Power(-3, 5))));
получишь (-3)⁵... Хотя... О чем это я. Этого же не существует, по заверениям некоторых участников форума:
( цитата - отсюда: возведение в вещественную степень отрицательного числа ) Видишь, как тебе повезло? Уже радуешься?

volvo прав: если есть желание получше разобраться в вопросах с отрицательными основаниями в степенях, имеет смысл заглянуть в процитированную им тему: Но очень может статься, что в случае MaximumGame'а это будет лишним, ибо он четко указал, что речь идет о целых (ну, и, я предполагаю, неотрицательных) степенях. А в этом случае, как я уже говорил, операция возведения в степень эквивалентна многократному умножению числа само на себя - и не более того. Стандартная функция Power, как я полагаю, подходит к вопросу интеллектуально, удовлетворяя всех на основе здравого смысла, посредством отслеживания различных случаев, не мороча юзерам голову. Такое поведение в большинстве случаев приемлемо (собственно, обычная запись типа (-1)^n , встречающаяся, например, в рядах, тоже фактически работает по тому же принципу), но может вызвать иной раз некоторое недоумение - как, например, обсуждавшееся в процитированной теме. Так что некоторая осмотрительность не помешает. Но она не мешает никогда - кроме, разве что, ловли блох.. Впрочем - о чем это я? (С) Именно при debugging'е желательно проявлять ее в полной мере

Все понял! 'умножение на само себя' блин это же так просто а на счет отрицательных степеней, то как мне видится дело добавления одного условия все решит, а с предложенной темой ознакомлюсь. Спсибо