Расчет чисел Фибаначи. - 15 Января 2012 - Сайт заготовки для Дельфи&Pascal

Главная » 2012 » Январь » 15 » Расчет чисел Фибаначи.

21:22 Расчет чисел Фибаначи.
Пример функции расчета чисел Фибаначи Чи́сла Фибона́ччи — элементы числовой последовательности 0, 1, 1, 2, 3, 5, 8, 13, 21, 34, 55, 89, 144, 233, 377, 610, 987, 1597, 2584, 4181, 6765, 10946, … (последовательность A000045 в OEIS) в которой каждое последующее число равно сумме двух предыдущих чисел. Название по имени средневекового математика Леонардо Пизанского (известного как Фибоначчи)[1]. Иногда число 0 не рассматривается как член последовательности. Более формально, последовательность чисел Фибоначчи задается линейным рекуррентным соотношением: Иногда числа Фибоначчи рассматривают и для отрицательных номеров n как двусторонне бесконечную последовательность, удовлетворяющую тому же рекуррентному соотношению. При этом члены с отрицательными индексами легко получить с помощью эквивалентной формулы «назад»: пример кода на Pascal/Delphi для расчета числа Фибаначи. Function GetFibo(g:integer):integer; var x1,x2,x3:integer; i:integer; begin x1:=1; x2:=1; for i:=1 to g do begin x3:=x1+x2; x1:=x2; x2:=x3; end; result:=x3; end; // числа фибоначи begin Writeln(inttostr(GetFibo(40))); end.
1 2 3 4 5 Просмотров: 2489 \| Добавил: NetSoftWare \| Рейтинг: 1.0/1

Всего комментариев: 0