Паскаль.

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

Question

Фелицитата

7 июня, 00:50

+3

Ответы (1)

Знаете ответ на вопрос?

Ксанфиппа · Answer 1

var

s: string;

begin

readln (s) ;

foreach w: string in s. Split (' ') do

write (w[1] + w. Replace (w[1], '') + ' ') ;

end.