| 
| 
 | Вопрос # 5 199/ вопрос открыт / | 
 |  Приветствую, уважаемые эксперты!Как можно в delphi 7 писать: (1+(1/(1+r/1200)^(12*y+m)-1)
 
|  |   Вопрос задала: Monika (статус: Посетитель)Вопрос отправлен: 15 апреля 2011, 09:45
 Состояние вопроса: открыт, ответов: 2.
 |  Ответ #1. Отвечает эксперт: IlluminatI Здравствуйте, Monika!Если выражение переписано правильно, то так и писать.
 
|  | Ответ отправил: IlluminatI (статус: 2-ой класс)Время отправки: 15 апреля 2011, 10:04
 
 |  Ответ #2. Отвечает эксперт: min@y™ Ну, если мой телепатор правильно понял, т.е. выражение выглядит вот так:
  то на паскале это будет вот эдак:
 
 var
  a, b, x: Double;
begin
  a:= 1 + r / 1200;
  b:= 12 * y + m;
  x:= 1 + 1 / (exp(b * ln(a)) - 1);
end; 
|  | Ответ отправил: min@y™ (статус: Доктор наук)Время отправки: 15 апреля 2011, 13:28
 
 |  
 Мини-форум вопросаВсего сообщений: 6; последнее сообщение — 15 апреля 2011, 19:26; участников в обсуждении: 4. 
|   | min@y™ (статус: Доктор наук), 15 апреля 2011, 10:18 [#1]: Цитата (IlluminatI): Здравствуйте, Monika! Если выражение переписано правильно, то так и писать. Сам-то понял, что написал? Где ты видел в паскале оператор возведения в степень ("^")? Это тебе не бейсик!
 
 2 Аффтар: В выражении количество открывающих скобок не равно количеству закрывающих, исправь. И ещё вопрос: какой приоритет имее операция возведения в степень?
 
 З.Ы. Лучше набери это выражение в маткаде или в MSEquation чистым математическим языком (с дробями, степенями и т.д.), сделай кусок скриншота и гденить выложи, а то не совсем понятно.
 Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп! |  
|   | bugmenot (статус: 3-ий класс), 15 апреля 2011, 11:42 [#2]:степень: Math.Power(основание, показатель) виконання програми розпочинається з того самого мiсця, де призупинилося.
 
 |  
|   | IlluminatI (статус: 2-ой класс), 15 апреля 2011, 13:37 [#3]:min@y™ : упс, поторопился... |  
|   | min@y™ (статус: Доктор наук), 15 апреля 2011, 13:43 [#4]: Цитата (IlluminatI): упс, поторопился... Когда идёт работа мозга, торопиться низзя!
 Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп! |  
|   | Егор (статус: 10-ый класс), 15 апреля 2011, 17:29 [#5]: Цитата (min@y™): Ну, если мой телепатор правильно понял, т.е. выражение выглядит вот так: блин, а у мну картинко не окрылся...
  это потому что телепатора поломался?
   Опасайтесь багов в приведенном выше коде; я только доказал корректность, но не запускал его.— Donald E. Knuth.
 |  
|   | min@y™ (статус: Доктор наук), 15 апреля 2011, 19:26 [#6]: Цитата (Егор): блин, а у мну картинко не окрылся...    это потому что телепатора поломался? Не, настрой бараузера, насяльника, бешельме жекельме бананама!
 Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп! |  Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте. |