Question

Последовательностью Фибоначчи называется последовательность чисел a0, a1, ..., an, ..., где a0 = 0, a1 = 1, ak = ak-1 + ak-2 (k > 1).

Требуется найти N-е число Фибоначчи.

Примечание. В программе запрещается использовать циклы.

Формат входных данных
На вход программы поступает целое неотрицательное число N (N ≤ 30).

Формат выходных данных
Требуется вывести N-е число Фибоначчи.

Пример
Входные данные
7
Выходные данные
13

Answer 1

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