Номер §1.2 ПМ 4

По примеру первые два члена последовательности равны . Каждый следующий член равен сумме двух предыдущих: . Оформим это правило как рекурсивную функцию и вызовем её для номеров от до .

var i: integer;

function f(n: integer): integer;
begin
  if (n = ) or (n = ) then f := 
  else f := f(n - ) + f(n - )
end;

begin
  for i :=  to  do write(f(i), ' ')
end.

Условие при n = или n = останавливает рекурсию. Иначе функция обращается к двум более ранним членам. Цикл задаёт ровно номеров. Последовательно получаем , , , , , , , , , .