Определите целое число, численно равное количеству выводимых на печать звездочек при вызове из программы процедуры G и передаче в нее параметра n=4: procedure F(n: integer); forward; procedure G(n: integer); forward; procedure F(n: integer); begin if n > 0 then G(n - 1); end; procedure G(n: integer); begin write('*'); if n > 1 then F(n - 3); end; begin G(4); end.
Задание

Определите целое число, численно равное количеству выводимых на печать звездочек при вызове из программы процедуры G и передаче в нее параметра n=4:
procedure F\(n: integer\); forward;
procedure G\(n: integer\); forward;
procedure F\(n: integer\);
begin
if n > 0 then
G\(n \- 1\);
end;
procedure G\(n: integer\);
begin
write\('\*'\);
if n > 1 then
F\(n \- 3\);
end;
begin
G\(4\);
end.