Определите, что выведет на экран программа при вызове F(5). procedure F(n: integer); forward;

procedure G(n: integer); forward;

procedure F(n: integer);

begin

if n > 2 then

begin

write(n);

F(n - 1);

G(n - 2);

end

else

write(n+2);

end;

procedure G(n: integer);

begin

write(n);

if n > 2 then

begin

G(n - 1);

F(n - 2);

end;

end;

​

Нурка11лиса    1   28.04.2021 13:19    5