Пожалуйста помогите!
Даны строка S и символ B.Написать программу, которая удваивает каждое вхождение символа B в строку S
Желательно написать на Python или Pascal
Спасибо!

PascalABC.NET 3.4.2, сборка 1814 от 02.10.2018

Внимание! Если программа не работает, обновите версию!

begin

 var s := ReadlnString('Введите строку:');

 var c := ReadlnString('Какой символ удвоить?');

 s := s.Replace(c, 2 * c);

 s.Println

end.