Рекурсия: вычисление n-ого числа Фибоначчи

@Gagarin614 · Регистрация: 26.10.2010

Author24 — интернет-сервис помощи студентам

Помогите написать программу в делфи:
Условие:
Описать рекурсивную функцию
function fib(n : integer) : integer;
для вычисления n-ого (n =< 40) числа Фибоначчи.
Указание.
Последовательность чисел Фибоначчи fk образуется так:
f0=1, f1=1, fk = fk-2 + fk-1.
Зарания спасибо

@new_in_net · 09.03.2011, 18:47

Delphi

function Fib(N: integer) : integer;
begin
  if N <= 2 then
    Result := 1
  else
    Result := Fib(N-2) + Fib(N-1)
end;

@Gagarin614 · 10.03.2011, 16:16 **[ТС]**

а можно написать цельную программу? ну тоесть с описания переменных до end? а то чет темный лес для меня это

@Gagarin614 · 12.03.2011, 14:31 **[ТС]**

очень надо

@mss · 12.03.2011, 14:37

> чет темный лес для меня это

Смешно думать что лес просветлится, если ты получишь готовый код.

@Gagarin614 0 / 0 / 0 Регистрация: 26.10.2010 Сообщений: 15
		1
	Рекурсия: вычисление n-ого числа Фибоначчи 09.03.2011, 14:35. Показов 3297. Ответов 4 Метки нет (Все метки) Помогите написать программу в делфи: Условие: Описать рекурсивную функцию function fib(n : integer) : integer; для вычисления n-ого (n =< 40) числа Фибоначчи. Указание. Последовательность чисел Фибоначчи fk образуется так: f0=1, f1=1, fk = fk-2 + fk-1. Зарания спасибо 0

@Gagarin614 0 / 0 / 0 Регистрация: 26.10.2010 Сообщений: 15
	10.03.2011, 16:16 [ТС]	3
	а можно написать цельную программу? ну тоесть с описания переменных до end? а то чет темный лес для меня это 0

@Gagarin614 0 / 0 / 0 Регистрация: 26.10.2010 Сообщений: 15
	12.03.2011, 14:31 [ТС]	4
	очень надо 0

@mss 2664 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	12.03.2011, 14:37	5
	> чет темный лес для меня это Смешно думать что лес просветлится, если ты получишь готовый код. 0