Question

Определите, сколько звёздочек будет напечатано в результате вызова F(7)? procedure F(n: integer); begin if n > 1 then begin write(‘ * ’); F(n - 1); F(n div 2) End; end; Нужно очень срочно, пожалуйста.

Answer 1

Ответ:

12

Объяснение:

function f(n:integer):integer;

begin

 f:=0;

 if n > 1 then

   f:=1+f(n-1)+f(n div 2);

end;

begin

 write(f(7));

end.

Answer 2

Давайте рассмотрим, как будет работать данная процедура F(7).

Сначала вызывается F(7), и внутри процедуры будет выполнено следующее:

1. Выводится символ " * ".
2. Вызывается F(6).
3. Внутри F(6) также будет выполнен вывод " * " и вызов F(6 div 2), то есть F(3).
4. В F(3) также будет выполнен вывод " * " и вызов F(3 div 2), что равно F(1).
5. В F(1) будет выведен " * ".

Теперь вернемся на шаг 3, где F(3) вызывает F(1), и после этого выполнится F(3 div 2), что равно F(1).

Итак, суммируя все выводы символа " * ", получим: 1 (от F(7)) + 1 (от F(6)) + 1 (от F(3)) + 1 (от F(1)) = 4 звездочки.

Итак, при вызове F(7) будет напечатано 4 звездочки.