
Siam
6 год назад
Последовательностью Фибоначчи называется последовательность чисел a0, a1, ..., an, ..., где a0 = 0, a1 = 1, ak = ak-1 + ak-2 (k > 1).Требуется найти N-е число Фибоначчи.Примечание. В программе запрещается использовать циклы.Формат входных данныхНа вход программы поступает целое неотрицательное число N (N ≤ 30).Формат выходных данныхТребуется вывести N-е число Фибоначчи.ПримерВходные данные 7 Выходные данные 13
ОТВЕТЫ

Valentina
Oct 24, 2020
var n:integer;
function Fib(k:integer):integer;
begin
if k=0 then Fib:=0
else if k=1 then Fib:=1
else Fib:=Fib(k-1)+Fib(k-2);
end;
begin
readln(n);
writeln(Fib(n));
end.
Пример:
10
55
function Fib(k:integer):integer;
begin
if k=0 then Fib:=0
else if k=1 then Fib:=1
else Fib:=Fib(k-1)+Fib(k-2);
end;
begin
readln(n);
writeln(Fib(n));
end.
Пример:
10
55
170
Смежные вопросы: