Function F(n: integer): integer; begin if n>2 then F:=F(n-1)+G(n-2) else F:=n; end; function G(n: integer): integer; begin if n>2 then G:=G(n-1)+F(n-2) else G:=2-n; end;

Function F(n: integer): integer;
begin
if n>2 then
F:=F(n-1)+G(n-2)
else
F:=n;
end;
function G(n: integer): integer;
begin
if n>2 then
G:=G(n-1)+F(n-2)
else
G:=2-n;
end; (Решение → 850)

Function F(n: integer): integer; begin if n>2 then F:=F(n-1)+G(n-2) else F:=n; end; function G(n: integer): integer; begin if n>2 then G:=G(n-1)+F(n-2) else G:=2-n; end;



Function F(n: integer): integer;
begin
if n>2 then
F:=F(n-1)+G(n-2)
else
F:=n;
end;
function G(n: integer): integer;
begin
if n>2 then
G:=G(n-1)+F(n-2)
else
G:=2-n;
end; (Решение → 850)

Последовательно найдем значения функций от n=1 до искомого n=6 F(1) = 1 F(2) = 2 G(1) = 1 G(2) = 0 F(3) = F(2) + G(1) = 2+1 = 3 F(4) = F(3) + G(2) = 3+0 = 3 G(3) = G(2) + F(1) = 0+1 = 1 G(4) = G(3) + F(2) = 1+2 = 3 G(5) = G(4) + F(3) = 3+3 = 6 G(6) = G(5) + F(4) = 6+3 = 9 Ответ: 9