Безотлагательно!!! Составить метод и программу в ПаскалеВывести n-ое число Фибоначчи
Безотлагательно!!! Составить алгоритм и программу в Паскале
Вывести n-ое число Фибоначчи (1, 1, 2, 3, 5, 8, 13, 21, 34, 55, 89, 144, ).
Справка: Последовательность чисел, каждый член которой равен сумме двух предыдущих, имеет огромное количество любопытных параметров. (http://elementy.ru/trefil/21136/Chisla_Fibonachchi)
Подсказка:
а) бережём в памяти в каждый текущий момент три числа, текущее и два предыдущих;
б) перед началом вычислений f1=1, f2=1;
в) после вычисления текущего числа по формуле ft = f1 + f2 необходимо выполнить передвижку чисел f1 = f2 f2 = ft
1 ответ
Степан Нистраткин
Для решения сделаем функцию Fib(n), в качестве довода она будет получать число n. Эта функция будет отдавать число, которое будет одинаково f(n-1) + f(n-2). То есть она вызывает себя 2 раза из самой себя до тех пор ,пока не дойдет до 1 либо 2.
Добавим условие на 1 и 2(if n lt;=2 then Fib:= 1), которое прекратит нашу рекурсию
PascalABC.NET
var
n: integer;
function Fib(n:integer): longint;
Begin
if n lt;=2 then Fib:= 1 else
Fib:= Fib(n - 1) + Fib(n - 2);
end;
Begin
readln(n);
Writeln(Fib(n));
end.
Добавим условие на 1 и 2(if n lt;=2 then Fib:= 1), которое прекратит нашу рекурсию
PascalABC.NET
var
n: integer;
function Fib(n:integer): longint;
Begin
if n lt;=2 then Fib:= 1 else
Fib:= Fib(n - 1) + Fib(n - 2);
end;
Begin
readln(n);
Writeln(Fib(n));
end.
Василиса Тафипольская
кстати,та программа, что ты составил,она не работает,пишет что ожидалось ; а повстречалось var и ещё куча ошибок
Регина Шамич
это познания форматируют криво, ща исправим прогу
Хачатуров-Тавризян
Кирилл
жду)
Евгения Зигянгирова
а кстати,мне ещё алгоритм необходимо
Полина Илялетдинова
не знаешь как?
Леха
ах тыж обманщик! у меня все работает. это ты ошибочно скопировал, насчет метода, сейчас попробую блок схему нарисовать, я в них не особо, я больше код пишу, если что в лс скину
Леша Одувалов
го вк
Миша
я не могу здесь,только зарегался
Коля Цицеров
ало
Анжелика Адиятулина
ты тут?
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Игорь 14 лет назад был на 8 лет моложе, чем его
Математика.
Два тела массами m1 и m2 находящие на расстоянии R друг
Физика.
В сосуде 4целых одна пятая литр воды что бы заполнить сосуд
Математика.
Двум малярам Диме И Олегу поручили выкрасить фасад дома они разделили
Разные вопросы.
найти порядковый номер 41Э если в ядре 20 нейтронов
Разные вопросы.
в ряду натуральных чисел 3, 8, 10, 24, … 18 одно
Математика.
Предприятие по производству с/хоз продукции на производство затратило 3527000 руб Валовый
Разные вопросы.
Математика, задано на каникулы. ВАРИАНТ 1004
НОМЕР 1,2,3,4,5,6,7,8.
Математика.
Имеются три конденсатора емкостью С1=1мкФ, С2=2мкФ и С3=3мкФ. Какую наименьшую емкость
Физика.
Из точки м выходят 3 луча MP MN и MK причём
Геометрия.
Облако тегов