функция с рекурсией

[cyx]

1)Составить программу решения задачи: определить количество способов, которыми можно расставить n книг на полки, программа должна содержать функцию с рекурсией.
2) Составить программу нахождения n-го числа Фибоначчи, программа должна включать функцию с рекурсией.
Помогите пожалуйста решить, буду очень благодарен Вам.

[Stilet]

А попытки увидеть мона?

[cyx]

program fib;
var n,f:integer;
function fibonac(n:integer):integer;
begin
     if ((n=1) or (n=2)) then fibonac:=1 else fibonac:=fibonac(n-1)+fibonac(n-2);
end;
begin
        readln(n);
        f:=fibonac(n);
        writeln(f);
end.

[Stilet]

Опаньки! Так у тебя решение же есть )
Проверял? Работает?

[Sibedir]

Если считать все книги разными:
Если количество способов для N книг = X, то при добавлении еще одной книги способов станет = X*(новое кол-во книг).

[Arigato]

Вопросы о том, как найти число Фибоначчи и им подобные вообще не должны возникать, в инете столько готовых решений, выбирай любое. Это же типовая задача, которую задают в 90% вузах. Да чего там говорить, если без рекурсии, то решение задачи можно найти даже в пределах моего аватара

[cyx]

Вот с книгами, мне бы пригодилась помощь.... объясните, хотя бы теоретически, как это осуществить.

всё можно сделать, лишь бы желание было) правда, не всегда понятно сразу как делать.

[type_Oleg]

Сообщение от cyx

Вот с книгами, мне бы пригодилась помощь.... объясните, хотя бы теоретически, как это осуществить.

Мне кажется, преподаватели нарочно формулируют так, чтобы затруднить гугление и поиск готовых ответов.
Заставляют бедных студентов думать самим.
Вот если бы вместо .. количество способов, которыми можно расставить n книг на полки.. написали бы найти факториал или хотя бы число перестановок , то сразу бы нашли .. Оба на - https://ru.wikipedia.org/wiki/Перестановка . Это оказывается - просто факториал.
А факториалы с помощью рекурсии уж 100500 раз писали.

[Sibedir]

Сообщение от cyx

Вот с книгами, мне бы пригодилась помощь.... объясните, хотя бы теоретически, как это осуществить.

ДА КУДА УЖ ПОНЯТНЕЕ-ТО!!!

Сообщение от Sibedir

Если считать все книги разными:
Если количество способов для N книг = X, то при добавлении еще одной книги способов станет = X*(новое кол-во книг).

А. Не. Вот же. Еще понятнее

Сообщение от type_Oleg

Это оказывается - просто факториал.

[Stilet]

Факториал?:

function factoriacci(n:integer):integer;
begin
     if (n<2) then factoriacci:=1 else factoriacci:=n*factoriacci(n-1);
end;