Задание

Определите значение функции 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