ъЧто выведет программа при вызове F(8)?
procedure F(n: integer);
begin
if n > 0 then begin
write('В');
G(n - 1);
end;
end;
procedure G(n: integer);
begin
write('A');
if n > 1 then begin
write('A');
F(n - 2);
end;
end;

hhggggghg    3   23.03.2020 21:43    2