Как перевести формулу?

[billiwilli]

Здравствуйте всем. Подскажите, как перевести формулу в читабельный для Делфи "язык" и получить результат ?

Спасибо!

[Pavia]

for t:=0 to C-1 do
  N:=(N*R)/(1+Power(a*N, b));

[billiwilli]

Сообщение от Pavia

for t:=0 to C-1 do
  N:=(N*R)/(1+Power(a*N, b));

а почему С-1? И почему (N*R) ? Как в таком виде подставится t? ведь в числителе там Nt * R?

[Аватар]

Это рекуррентное соотношение, в котором каждое последующее значение выражается через предыдущее. Нужно еще начальное значение N. А цикл можешь и от 1 до C

[billiwilli]

Сообщение от Аватар

Это рекуррентное соотношение, в котором каждое последующее значение выражается через предыдущее. Нужно еще начальное значение N. А цикл можешь и от 1 до C

Ну у меня есть значения a = 5, b = 8, N0 = 200
Тогда мне просто эти переменные задать до цикла и будет работать все?

[evg_m]

Ну у меня есть значения a = 5, b = 8, N0 = 200
Тогда мне просто эти переменные задать до цикла и будет работать все?

нет. еще нужно будет задать R и С.

[ura_111]

Обычно такие выражения сохраняют в массиве.
Тогда будет понятно что такое t и t+1 и t+2... - это индекс массива.

[billiwilli]

Сообщение от evg_m

нет. еще нужно будет задать R и С.

Cделал такое в конечном варианте. Верно? А то меня смущают большие числа(миллиарды)


Результат -

[billiwilli]

изменил предыдущее сообщзение. подскажите

[Serge_Bliznykov]

Верно?

нет не верно.

скобки потеряли.
правильно вот так:

 N:=(N*R)/(1+Power(a*N, b));

и выкиньте у себя из кода N0 и Nt - оставьте одно N
этого вполне достаточно.