 Блейк51 
                                                19.10.2020 01:26
                                                
                                                Блейк51 
                                                19.10.2020 01:26
                                             ezek5 
                                                19.10.2020 01:37
                                                
                                                ezek5 
                                                19.10.2020 01:37
                                             enigma75 
                                                30.07.2019 16:10
                                                
                                                enigma75 
                                                30.07.2019 16:10
                                             annaaristova 
                                                30.07.2019 16:10
                                                
                                                annaaristova 
                                                30.07.2019 16:10
                                             madinamerzhoeva 
                                                21.06.2019 09:20
                                                
                                                madinamerzhoeva 
                                                21.06.2019 09:20
                                             catttttttttttttttttt 
                                                18.11.2020 13:27
                                                
                                                catttttttttttttttttt 
                                                18.11.2020 13:27
                                             Aruzhan0121 
                                                24.04.2020 19:50
                                                
                                                Aruzhan0121 
                                                24.04.2020 19:50
                                             Даниэль1011 
                                                24.04.2020 19:49
                                                
                                                Даниэль1011 
                                                24.04.2020 19:49
                                             Merlin33 
                                                24.04.2020 19:50
                                                
                                                Merlin33 
                                                24.04.2020 19:50
                                            
begin
write('*');
if n > 0 then begin
write('*');
F(n - 2);
F(n div 2);
end
end;
begin
f(7);
end.
напечатает 31 звездочку
заменила writeln на write чтоб легче было считать