Паскаль. дана строка, содержащая слова, разделенные одним пробелом. напечатать все слова, предварительно преобразовав каждое из них по следующему правилу: удалить из слова все последующие вхождения первой буквы

var
  s: string;

begin
  readln(s);
  foreach w: string in s.Split(' ') do
    write(w[1] + w.Replace(w[1], '') + ' ');
end.