Выберите из списка значение функции 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
Задание

Выберите из списка значение функции 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