var
s:string;
i:integer;
begin
readln(s);
for i:=Length(s) downto 1 do//просматриваем текст с конца(обязательно)
if s[i]='B' then
begin
delete(s,i,1);//удаляем Б
insert('ku',s,i);//вставлем ку
writeln(s);
end;
end.
var
s:string;
i:integer;
begin
readln(s);
for i:=Length(s) downto 1 do//просматриваем текст с конца(обязательно)
if s[i]='B' then
begin
delete(s,i,1);//удаляем Б
insert('ku',s,i);//вставлем ку
writeln(s);
end;
end.