Найти все различные слова в строке

@LenaLop · Регистрация: 02.12.2009

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

не могли бы вы помочь с задачей на строки??Дано предложение.Найти все его различные слова.Пожалуйста помогите..

@Inadequate · 18.12.2009, 20:15

LenaLop, один вопрос - одна тема.

@кот Бегемот · 18.12.2009, 20:17

Inadequate, ей надо по 1 разу все слова: из "дом, дом! дом сад, сад" получить "дом сад "

@LenaLop · 18.12.2009, 20:21 **[ТС]**

Inadequate, если дано предложение например:пришла пришла домой,он должен выводить:домой.))

@Inadequate · 18.12.2009, 20:22

alexevt, а ну тогда все именно так и находит прога... А то я засомневался, думал мож я не так понял задание...

Добавлено через 37 секунд
LenaLop, а ну тогда надо слегка исправить программу...

@LenaLop · 18.12.2009, 20:27 **[ТС]**

все))спасибо))я поняла)))

Добавлено через 29 секунд
зайдите пожалуйста на другую мою тему а....прошу...

@кот Бегемот · 18.12.2009, 20:27

LenaLop Сначала задание было другим. Но я делал оба варианта, сначала только слова,встречающиеся 1 раз, а потом первый вариант слов.

@Inadequate · 18.12.2009, 20:30

Тогда вот так должно быть

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
const
  c=[',','.',' ',':','&','='];{дописать нужные}
var
  a,temp:string;
  b:array[1..128]of string;
  i,j,k,coun:integer;
  fl:boolean;
begin
  readln(a);
  k:=0;
  for i:=1 to length(a) do
  begin
    if not (a[i] in c) then
      temp:=temp+a[i];
    if (a[i] in c) or (i=length(a)) then
      if temp<>'' then
      begin
        inc(k);
        b[k]:=temp;
        temp:=''
      end;
  end;
  for i:=1 to k do
  begin
    coun:=0;
    for j:=1 to k do
      if b[j]=b[i] then
        inc(coun);
    if coun=1 then
      write(b[i],' ')
  end;
  readln;
end.

Добавлено через 1 минуту
ну думаю лишним не будет...

@LenaLop · 18.12.2009, 20:34 **[ТС]**

alexevt, да я помню))спасибо)))

даже у меня заработала))

@LenaLop · 25.12.2009, 17:49 **[ТС]**

Inadequate, что значит temp в вашей программе??переменная которая...

@Inadequate · 25.12.2009, 17:56

LenaLop, temp здесь временная переменная в которую добавляются символы, которые не входят в множество разделителей. Как только очередной символ входит в множество разделителей, мы заносим получившееся слово из temp в массив. Вот собственно и всё.

@LenaLop · 25.12.2009, 18:07 **[ТС]**

Inadequate, а если же мы в темп будем записывать слова без разделителей,то в темпе же будет одно огромное слово..потому что если убрать все символы,которые нах-ся в множестве,там уберется и пробел..

@Inadequate · 25.12.2009, 18:15

LenaLop, обратите внимание на 20 строчку. Там не будет большого слова, т.к. после добавления в массив, она становится пустой.

Новые блоги и статьи Все статьи Все блоги /
Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .	Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .	Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .	Программа опроса у.з. расходомера SLS-720F Argus19 02.09.2026 Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .	Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0. Maks 31.08.2026 При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .	Архитектура биовида Стива в Майнкрафте: Зачем бонобо кубический каннибализм anaschu 30.08.2026 Кубический Вагинокапитализм в Minecraft: Математический инвариант ОДУ и рок Стивов-бонобо Главная задача разработанной «Модели Всего» — наглядно продемонстрировать наличие системной «судьбы». . .

@LenaLop 1 / 1 / 0 Регистрация: 02.12.2009 Сообщений: 38

	Найти все различные слова в строке 14.12.2009, 16:00. Показов 7056. Ответов 31 Метки нет (Все метки) не могли бы вы помочь с задачей на строки??Дано предложение.Найти все его различные слова.Пожалуйста помогите.. 0

@Inadequate Retired 7727 / 2559 / 671 Регистрация: 17.10.2009 Сообщений: 5,100
	18.12.2009, 20:15
	LenaLop, один вопрос - одна тема. 0

@кот Бегемот Платежеспособный зверь 8966 / 4389 / 1655 Регистрация: 28.10.2009 Сообщений: 11,647
	18.12.2009, 20:17
	Inadequate, ей надо по 1 разу все слова: из "дом, дом! дом сад, сад" получить "дом сад " 1

@LenaLop 1 / 1 / 0 Регистрация: 02.12.2009 Сообщений: 38
	18.12.2009, 20:21 [ТС]
	Inadequate, если дано предложение например:пришла пришла домой,он должен выводить:домой.)) 0

@Inadequate Retired 7727 / 2559 / 671 Регистрация: 17.10.2009 Сообщений: 5,100
	18.12.2009, 20:22
	alexevt, а ну тогда все именно так и находит прога... А то я засомневался, думал мож я не так понял задание... Добавлено через 37 секунд LenaLop, а ну тогда надо слегка исправить программу... 1

@LenaLop 1 / 1 / 0 Регистрация: 02.12.2009 Сообщений: 38
	18.12.2009, 20:27 [ТС]
	все))спасибо))я поняла))) Добавлено через 29 секунд зайдите пожалуйста на другую мою тему а....прошу... 0

@кот Бегемот Платежеспособный зверь 8966 / 4389 / 1655 Регистрация: 28.10.2009 Сообщений: 11,647
	18.12.2009, 20:27
	LenaLop Сначала задание было другим. Но я делал оба варианта, сначала только слова,встречающиеся 1 раз, а потом первый вариант слов. 1

@LenaLop 1 / 1 / 0 Регистрация: 02.12.2009 Сообщений: 38
	18.12.2009, 20:34 [ТС]
	alexevt, да я помню))спасибо)))даже у меня заработала)) 0

@LenaLop 1 / 1 / 0 Регистрация: 02.12.2009 Сообщений: 38
	25.12.2009, 17:49 [ТС]
	Inadequate, что значит temp в вашей программе??переменная которая... 0

@Inadequate Retired 7727 / 2559 / 671 Регистрация: 17.10.2009 Сообщений: 5,100
	25.12.2009, 17:56
	LenaLop, temp здесь временная переменная в которую добавляются символы, которые не входят в множество разделителей. Как только очередной символ входит в множество разделителей, мы заносим получившееся слово из temp в массив. Вот собственно и всё. 2

@LenaLop 1 / 1 / 0 Регистрация: 02.12.2009 Сообщений: 38
	25.12.2009, 18:07 [ТС]
	Inadequate, а если же мы в темп будем записывать слова без разделителей,то в темпе же будет одно огромное слово..потому что если убрать все символы,которые нах-ся в множестве,там уберется и пробел.. 0

@Inadequate Retired 7727 / 2559 / 671 Регистрация: 17.10.2009 Сообщений: 5,100
	25.12.2009, 18:15
	LenaLop, обратите внимание на 20 строчку. Там не будет большого слова, т.к. после добавления в массив, она становится пустой. 1