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

@ketik · Регистрация: 04.11.2015

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

@ZX Spectrum-128 · 04.11.2015, 16:50

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

@ketik · 04.11.2015, 16:55 **[ТС]**

мне нужно именно в каждом слове один раз

@volvo · 04.11.2015, 18:55

В каждом слове - ровно один раз:

Pascal

begin
  var s : string := 'bonne ohbe eeehbho'; // как видим - это буквы "b" и "o"
  var its := s.Split(' ').Select
    ((t : string) ->
      t.ToCharArray().GroupBy(ch -> ch).Where(x -> x.Count() = 1).Select(x -> x.Key)
    ).where(ls -> ls.Any()).Aggregate((x, y) -> x.Intersect(y));
  foreach var ch in its do write(ch:2);
end.

@ketik 0 / 0 / 0 Регистрация: 04.11.2015 Сообщений: 2
		1
	Распечатайте те буквы, которые встречаются в каждом слове текста только один раз 04.11.2015, 16:40. Показов 1127. Ответов 3 Метки нет (Все метки) Пусть дан текст. Распечатайте те буквы, которые встречаются в каждом слове текста только один раз __________________ Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь 0

@ZX Spectrum-128 6803 / 4562 / 4817 Регистрация: 05.06.2014 Сообщений: 22,438
	04.11.2015, 16:50	2
	Распечатайте буквы, которые встречаются в каждом слове текста только один раз 0

@ketik 0 / 0 / 0 Регистрация: 04.11.2015 Сообщений: 2
	04.11.2015, 16:55 [ТС]	3
	мне нужно именно в каждом слове один раз 0

Опции темы