Паскаль.Дана строка, содержащая слова, разделенные одним пробелом. Напечатать все слова, предварительно преобразовав каждое из них по следующему правилу: удалить из слова все последующие вхождения первой буквы
Паскаль.
Дана строка, содержащая слова, разделенные одним пробелом. Напечатать все слова, предварительно преобразовав каждое из них по следующему правилу: удалить из слова все последующие вхождения первой буквы
Ответ(ы) на вопрос:
var
s: string;
begin
readln(s);
foreach w: string in s.Split(' ') do
write(w[1] + w.Replace(w[1], '') + ' ');
end.
Не нашли ответ?
Похожие вопросы