Ниже записаны две рекурсивные функции (процедуры): F и G.Сколько символов «звёздочка» будет напечатано на экране при выполнении вызова F(12)? 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 begin writeln('*'); F(n - 2); end; end; Можете подробно расписать пожалуйста))))

Question

Ниже записаны две рекурсивные функции (процедуры): F и G.Сколько символов «звёздочка» будет напечатано на экране при выполнении вызова F(12)? 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 begin writeln('*'); F(n - 2); end; end; Можете подробно расписать пожалуйста))))

xedelestivi758 · Answer

Для того, чтобы эта программа заработала надо добавить перед описанием процедуры F следующую строчку:procedure G(n: integer);forward;Так как в процедуре F есть вызов процедуры G описанной дальше по тексту программы.После исправления кода и запуска программы с F(12) получим 17 звездочек. По шагам это будет выглядеть так: Вызов процедуры F и выполнение* n = 12* n = 12Вызов процедуры G и выполнение * n = 11 * n = 11Вызов процедуры F и выполнение* n = 9* n = 9Вызов процедуры G и выполнение* n = 8* n = 8Вызов процедуры Fи выполнение* n = 6* n = 6Вызов процедуры G и выполнение* n = 5* n = 5Вызов процедуры F и выполнение* n = 3* n = 3Вызов процедуры G и выполнение* n = 2* n = 2Вызов процедуры F и выполнение* n = 0

pieny893 · Answer

N=12F (12) печатает * *  вызывает G(11)   **F(9) печатает     **   вызывает G(8) 8**F(6)   **   G(5)  **F(3)  **   G(2) **F(1) *    и идёт вызов G(0)  и n>1 не выполняется и ----> выходИтого 17 *( в Вашей программе ошибки, посмотрите мою)

Ответы и объяснения 2

Знаете ответ? Поделитесь им!

Есть сомнения?