Пожалуйста, очень нужно! Программа в pascal... "Написать функцию, которая реализует...

Question

Пожалуйста, очень нужно! Программа в pascal... "Написать функцию, которая реализует последовательность Фибоначчи" . Тема: Создания процедур и функций в Pascal.

Answer 1

function fibonach(n:integer):longint;

begin

if (n=1) or (n=2) then fibonach:=1 else fibonach:=fibonach(n-1)+fibonach(n-2);

end;

Скорее всего так -__-

Comments

можно еще больше страйков, гений?)

---

просто писать надо адекватно,а не вот это вот все =_=, Умнич .