Метод вычисления значений функций F(n) и G(n), где n естественное

Значение величины G(5)-F(5) равно 12.
В процессе вычисления любая из функций вызывается по 31 разу, потому вычисление вручную очень мучительно.
Была составлена последующая программка, которая и выдала итог:

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

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

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

begin
  Writeln(G(5) - F(5))
end.