Паскаль.

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

Question

Енюта

10 декабря, 20:12

+1

Ответы (1)

Знаете ответ?

Нона · Answer 1

var

s: string;

begin

readln (s) ;

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

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

end.