Вычислите n-ое число фибоначчи. формализация: последовательность чисел фибоначчи f от n, определяется следующим образом: f1: =1, f2: =1, fn=fn-2+fn-1, n =3; 4 и т.д. входные данные: n- переменная целого типа, n > 2 . выходные данные: переменная f целого типа, n-ое число фибоначчи. решить !
Function f(n: integer): integer;
Begin
If n>2 then f:=f(n-2)+f(n-1) else f:=1;
End;
Var a: integer;
Begin
Readln(a);
Write(f(a));
End.