Предмет: Информатика,
автор: lizavetka0014
Вычислите n-ое число Фибоначчи. Формализация: последовательность чисел Фибоначчи f от n, определяется следующим образом: f1:=1, f2:=1, fn=fn-2+fn-1, n =3;4 и т.д. Входные данные: n- переменная целого типа, n >2 . Выходные данные: переменная f целого типа, n-ое число Фибоначчи. ПОМОГИТЕ ПОЖАЛУЙСТА РЕШИТЬ ЗАДАЧУ!!!
Ответы
Автор ответа:
0
//проще простого, обычная рекурсия
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.
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.
Похожие вопросы
Предмет: Право,
автор: emmabalasa5
Предмет: Английский язык,
автор: juliakos95
Предмет: Литература,
автор: akovenkodiana10
Предмет: Алгебра,
автор: Maria09824387
Предмет: Алгебра,
автор: sunny040400