Найти слова четной длины, у которых все буквы из первой половины слова встречаются во второй половине слова

@Lukariel · Регистрация: 19.03.2018

Author24 — интернет-сервис помощи студентам

Пожалуйста, помогите написать программу. Вот условие:

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

@Puporev · 19.03.2018, 18:51

Сообщение от Lukariel

состоящая из слов четной длины.

Сообщение от Lukariel

Вывести на экран все слова четной длины,

Так и написано в задании?

@Lukariel · 19.03.2018, 18:54 **[ТС]**

Да, именно так и написано

@Puporev · 19.03.2018, 18:57

По любому один раз слово четные лишнее.

@Lukariel · 19.03.2018, 18:59 **[ТС]**

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

@JuriiMW · 20.03.2018, 06:43

Из условия будем считать словом любой набор символов разделённый одним или несколькими пробелами.
Тогда:

Pascal

begin
  var words:=ReadLnString('Введите последовательность символов:').ToWords(' ').Where(word->Not odd(Word.Length));
  if words.Count=0 then begin WriteLn('Нет слов чётной длины.');Halt;end;
  words:=words.Where(word->word.SubString(0,word.Length div 2).Sorted.JoinIntoString=word.SubString(word.Length div 2).Sorted.JoinIntoString);
  if words.Count=0 then begin WriteLn('Нет слов, у которых все буквы первой половины встречаются во второй.');Halt;end;
  Write('Слова, у которых все буквы первой половины встречаются во второй: '); words.Println;
end.

@volvo · 20.03.2018, 10:52

Lukariel, слово aabbba подходит под условие задачи? Все буквы из первой половины (и "a" и "b") встречаются и во второй.

@JuriiMW · 20.03.2018, 10:55

volvo, я так понял: буквы второй части как перестановка букв первой…
Хотя, может быть и так, как вы говорите.
Ждём-с ответа ТС.
;–)

@Lukariel · 20.03.2018, 17:13 **[ТС]**

Большое спасибо, работает, как надо =) Теперь осталось в этом разобраться

Найти слова четной длины, у которых все буквы из первой половины слова встречаются во второй половине слова

Решение

Решение

@Lukariel 0 / 0 / 0 Регистрация: 19.03.2018 Сообщений: 5
		1
	Найти слова четной длины, у которых все буквы из первой половины слова встречаются во второй половине слова 19.03.2018, 18:48. Показов 1859. Ответов 8 Метки нет (Все метки) Пожалуйста, помогите написать программу. Вот условие: Дана последовательность символов, состоящая из слов четной длины. Вывести на экран все слова четной длины, у которых все буквы из первой половины слова встречаются во второй половине слова, или сообщение «Нет», если требуемых слов нет. 0

@Puporev Почетный модератор 64304 / 47599 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	19.03.2018, 18:51	2
	Сообщение от Lukariel состоящая из слов четной длины. Сообщение от Lukariel Вывести на экран все слова четной длины, Так и написано в задании? 0

@Lukariel 0 / 0 / 0 Регистрация: 19.03.2018 Сообщений: 5
	19.03.2018, 18:54 [ТС]	3
	Да, именно так и написано 0

@Puporev Почетный модератор 64304 / 47599 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	19.03.2018, 18:57	4
	По любому один раз слово четные лишнее. 0

@Lukariel 0 / 0 / 0 Регистрация: 19.03.2018 Сообщений: 5
	19.03.2018, 18:59 [ТС]	5
	Предположительно, можно исправить так: Дана последовательность символов, состоящая из слов. Вывести на экран все слова четной длины, у которых все буквы из первой половины слова встречаются во второй половине слова, или сообщение «Нет», если требуемых слов нет. 0

@volvo Супер-модератор 32928 / 21254 / 8160 Регистрация: 22.10.2011 Сообщений: 36,508 Записей в блоге: 8
	20.03.2018, 10:52	7
	Lukariel, слово `aabbba` подходит под условие задачи? Все буквы из первой половины (и "a" и "b") встречаются и во второй. 0

@JuriiMW 5084 / 2655 / 2350 Регистрация: 10.12.2014 Сообщений: 10,042
	20.03.2018, 10:55	8
	Сообщение было отмечено ZX Spectrum-128 как решение Решение volvo, я так понял: буквы второй части как перестановка букв первой… Хотя, может быть и так, как вы говорите. Ждём-с ответа ТС. ;–) 0

@Lukariel 0 / 0 / 0 Регистрация: 19.03.2018 Сообщений: 5
	20.03.2018, 17:13 [ТС]	9
	Большое спасибо, работает, как надо =) Теперь осталось в этом разобраться 0

Опции темы