Определите значение функции G, выводимое программой при передаче в нее параметра 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 := n; end; function G(n: integer): integer; begin if n > 2 then G := G(n-1) + F(n-2) else G := 3-n; end; begin for i:=0 to 8 do writeln(i,' ',G(i)) end. 4 3 5 2
Задание

Определите значение функции G, выводимое программой при передаче в нее параметра 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 := n;
end;
function G\(n: integer\): integer;
begin
if n > 2 then G := G\(n\-1\) + F\(n\-2\)
else G := 3-n;
end;
begin
for i:=0 to 8 do
writeln\(i,' ',G\(i\))
end.

  • 4
  • 3
  • 5
  • 2