Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ] > Код на шару!
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 20.03.2013, 19:12
Archer666 Archer666 вне форума
Прохожий
 
Регистрация: 20.03.2013
Сообщения: 17
Версия Delphi: Delphi 7
Репутация: выкл
По умолчанию X^n-1(A-X)

Требуется возможность возведения в вещественную степень, решение при отрицательных Х, возможность возведения в отрицательную вещественную степень с учетом знака Х, Power не предлагать..
Ответить с цитированием
  #2  
Старый 20.03.2013, 19:51
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,015
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Ну тогда пиши сам через логарифмы.
Ответить с цитированием
  #3  
Старый 20.03.2013, 20:13
Archer666 Archer666 вне форума
Прохожий
 
Регистрация: 20.03.2013
Сообщения: 17
Версия Delphi: Delphi 7
Репутация: выкл
По умолчанию

Цитата:
Сообщение от lmikle
Ну тогда пиши сам через логарифмы.
не могу реализовать возведение в вещественную степень с проверкой четности при отрицательном X..
Ответить с цитированием
  #4  
Старый 20.03.2013, 20:37
Аватар для M.A.D.M.A.N.
M.A.D.M.A.N. M.A.D.M.A.N. вне форума
Sir Richard Abramson
 
Регистрация: 05.04.2008
Сообщения: 5,505
Версия Delphi: XE10
Репутация: выкл
По умолчанию

Степень некоторого числа с отрицательным (целым) показателем определяется как единица, делённая на степень того же числа с показателем, равным абсолютной величине отрицательного показателя:

а^–n = (1/a^n)

Просто обертку над Power сделать.
__________________
— Как тебя понимать?
— Понимать меня не обязательно. Обязательно меня любить и кормить вовремя.


На Delphi, увы, больше не программирую.
Рекомендуемая литература по программированию
Ответить с цитированием
  #5  
Старый 20.03.2013, 20:59
Archer666 Archer666 вне форума
Прохожий
 
Регистрация: 20.03.2013
Сообщения: 17
Версия Delphi: Delphi 7
Репутация: выкл
По умолчанию

это понятно, но есть проблема с определением четности-нечетности n...
Ответить с цитированием
  #6  
Старый 20.03.2013, 21:30
Аватар для M.A.D.M.A.N.
M.A.D.M.A.N. M.A.D.M.A.N. вне форума
Sir Richard Abramson
 
Регистрация: 05.04.2008
Сообщения: 5,505
Версия Delphi: XE10
Репутация: выкл
По умолчанию

ф-я Odd.
_____
__________________
— Как тебя понимать?
— Понимать меня не обязательно. Обязательно меня любить и кормить вовремя.


На Delphi, увы, больше не программирую.
Рекомендуемая литература по программированию

Последний раз редактировалось M.A.D.M.A.N., 20.03.2013 в 21:38.
Ответить с цитированием
  #7  
Старый 20.03.2013, 21:46
Archer666 Archer666 вне форума
Прохожий
 
Регистрация: 20.03.2013
Сообщения: 17
Версия Delphi: Delphi 7
Репутация: выкл
Печаль

Цитата:
Сообщение от M.A.D.M.A.N.
ф-я Odd.
_____
не работает с вещественными
Ответить с цитированием
  #8  
Старый 20.03.2013, 22:01
Аватар для Bargest
Bargest Bargest вне форума
Профессионал
 
Регистрация: 19.10.2010
Адрес: Москва
Сообщения: 2,390
Версия Delphi: XE3/VS12/FASM
Репутация: 14665
По умолчанию

А ты сам можешь для числа 1.883 определить, четное оно или нет?
__________________
jmp $ ; Happy End!
The Cake Is A Lie.
Ответить с цитированием
  #9  
Старый 20.03.2013, 22:15
Archer666 Archer666 вне форума
Прохожий
 
Регистрация: 20.03.2013
Сообщения: 17
Версия Delphi: Delphi 7
Репутация: выкл
По умолчанию

Цитата:
Сообщение от Bargest
А ты сам можешь для числа 1.883 определить, четное оно или нет?
будет X в степени 1833/1000 это корень 1000 степени из X^1833 получается при отрицательном X нет решения...либо оно комплексное
Ответить с цитированием
  #10  
Старый 20.03.2013, 22:57
Аватар для Bargest
Bargest Bargest вне форума
Профессионал
 
Регистрация: 19.10.2010
Адрес: Москва
Сообщения: 2,390
Версия Delphi: XE3/VS12/FASM
Репутация: 14665
По умолчанию

Мда. Задание бы сформулировал нормально. Сначала ты говоришь, что
Цитата:
не могу реализовать возведение в вещественную степень с проверкой четности при отрицательном X..
то есть что надо возвести в степень (например, 3,141592653589793238462643383279) и каким-то образом то ли степень должна получиться целой, то ли результат. Потом говоришь по какие-то отрицательные икс.
Если ты имеешь в виду решения вида корень 3-й степени из -X - то можешь забыть это, потому что в общем случае ты произвольное число к нормальной степени-дроби не приведешь. А если приведешь - что мешает проверить знаменатель этой дроби на четность?
__________________
jmp $ ; Happy End!
The Cake Is A Lie.
Ответить с цитированием
  #11  
Старый 21.03.2013, 07:54
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,015
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Цитата:
Сообщение от Bargest
Мда. Задание бы сформулировал нормально. Сначала ты говоришь, что

то есть что надо возвести в степень (например, 3,141592653589793238462643383279) и каким-то образом то ли степень должна получиться целой, то ли результат. Потом говоришь по какие-то отрицательные икс.
Если ты имеешь в виду решения вида корень 3-й степени из -X - то можешь забыть это, потому что в общем случае ты произвольное число к нормальной степени-дроби не приведешь. А если приведешь - что мешает проверить знаменатель этой дроби на четность?

А не проще ли просто в try...except поместить возведение и при возникновении ошибки говорить, что невозможно возвести в степень?
Ответить с цитированием
  #12  
Старый 21.03.2013, 22:24
Аватар для Bargest
Bargest Bargest вне форума
Профессионал
 
Регистрация: 19.10.2010
Адрес: Москва
Сообщения: 2,390
Версия Delphi: XE3/VS12/FASM
Репутация: 14665
По умолчанию

Проще. Но ТС-то хочет зачем-то проверить, а потом возводить методом, отличным от POWER.
__________________
jmp $ ; Happy End!
The Cake Is A Lie.
Ответить с цитированием
  #13  
Старый 22.03.2013, 06:17
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,015
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Цитата:
Сообщение от Bargest
Проще. Но ТС-то хочет зачем-то проверить, а потом возводить методом, отличным от POWER.

Ну флаг ему в руки: pow(a,b) = exp(b*log(a));
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 10:45.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter