B11 - Рекурсивные алгоритмы

1. Дан рекурсивный алгоритм:
  procedure F(n: integer);
begin
writeln('*');
if n > 0 then begin
F(n-3);
F(n-2);
F(n div 2);
F(n div 2);
end
end;
Сколько символов "звездочка" будет напечатано на экране при выполнении вызова F(6)?
Ответ: 
2. Дан рекурсивный алгоритм:
  procedure F(n: integer);
begin
writeln('*');
if n > 0 then begin
writeln('*');
F(n-2);
F(n div 2);
end
end;
Сколько символов "звездочка" будет напечатано на экране при выполнении вызова F(7)?
Ответ: 
3. Дан рекурсивный алгоритм:
  procedure F(n: integer);
begin
writeln('*');
if n > 0 then begin
writeln('*');
F(n-2);
F(n-2);
F(n div 2);
end
end;
Сколько символов "звездочка" будет напечатано на экране при выполнении вызова F(6)?
Ответ: 
4. Дан рекурсивный алгоритм:
  procedure F(n: integer);
begin
writeln(n);
if n < 7 then begin
F(n+3);
F(n*2)
end
end;
Найдите сумму чисел, которые будут выведены при вызове F(2).
Ответ: 
5. Дан рекурсивный алгоритм:
  procedure F(n: integer);
begin
writeln(n);
if n < 7 then begin
F(n+2);
F(n+3)
end
end;
Найдите сумму чисел, которые будут выведены при вызове F(1).
Ответ: 
6. Дан рекурсивный алгоритм:
  procedure F(n: integer);
begin
writeln(n);
if n < 5 then begin
F(n+1);
F(n+2);
F(n*3)
end
end;
Найдите сумму чисел, которые будут выведены при вызове F(2).
Ответ: 
7. Дан рекурсивный алгоритм:
  procedure F(n: integer);
begin
writeln(n);
if n < 5 then begin
writeln(n);
F(n+3);
F(n*3)
end
end;
Найдите сумму чисел, которые будут выведены при вызове F(1).
Ответ: 
8. Ниже записаны две рекурсивные процедуры, F и G:
  procedure F(n: integer); forward;
procedure G(n: integer); forward;
procedure F(n: integer);
begin
writeln('*');
if n > 0 then
G(n - 1);
end;
procedure G(n: integer);
begin
writeln('*');
if n > 1 then
F(n - 2);
end;
Сколько символов "звёздочка" будет напечатано на экране при выполнении вызова F(13)?
Ответ: 
9. Ниже записаны две рекурсивные процедуры, F и G:
  procedure F(n: integer); forward;
procedure G(n: integer); forward;
procedure F(n: integer);
begin
writeln('*');
if n > 0 then begin
writeln('*');
G(n - 1);
end;
end;
procedure G(n: integer);
begin
writeln('*');
if n > 1 then
F(n - 2);
end;
Сколько символов "звёздочка" будет напечатано на экране при выполнении
вызова F(12)?
Ответ: 
10. Ниже записаны две рекурсивные функции, F и G:
 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;
Чему будет равно значение, вычисленное при выполнении вызова F(7)?
Ответ: