Дана запись рекурсивных алгоритмов процедур F и G. Чему равна сумма чисел, напечатанных на экране при выполнении вызова F (22)?

procedure F (n: integer); forward;
procedure G (n: integer); forward;
procedure F (n: integer);
begin
write (n, ' '),
if n mod 2 = 0 then F (n-1)
else G (n div 5)
end;
procedure G (n: integer);
begin
if n1 then F (n+4);
end