Задание

Выберите из списка значение функции F, выводимое на печать программой для передаваемого в нее параметра n=4:

var i: integer;

function F(n: integer): integer; forward;

function G(n: integer): integer; forward;

function F(n: integer):integer;

begin

if n > 2 then F := F(n - 1) + G(n - 2)

else F := 1;

end;

function G(n: integer): integer;

begin

if n > 2 then G := G(n - 1) + F(n - 2)

else G := 1;

end;

begin

for i:=0 to 8 do

writeln(i, ' ',F(i),' ', G(i-1),' ',G(i))

end.

3

2

5