Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  
 
0 / 0 / 0
Регистрация: 27.03.2011
Сообщений: 10

Поиск одинаковых слов в строках. Усложнение задачи.

30.10.2011, 17:32. Показов 1772. Ответов 0
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Найти все слова из 1 строки, которые не встречаются во 2. Написать все эти слова в 3 строку.

Строки могут быть любого размера.

можно задать цикл проверяя каждое слово из 1 строки на принадлежность 2 строке, но если одинаковых слов будет несколько, цикл не будет работать.
На форуме ничего подобного не видел.

Код:

Pascal
1
2
3
4
5
6
7
8
9
str1: array [1..n] of string;
str2: array [1..m] of string;
i:=1;
for k:=1 to n do 
 if str1[k] NOT in str2[1..m]
begin
   str3[i]:=str1[k];
   i:=i+1;
end;
Как дополнить?

имеется ввиду:

1) сегодня был был хороший день
2) завтра был плохой день

Должно вывести:

3) сегодня был хороший

В моей программе выведет:

3) сегодня хороший
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
30.10.2011, 17:32
Ответы с готовыми решениями:

Подпрограммы: сколько одинаковых букв находятся на одинаковых местах в двух строках?
Запишите строку А в обратном порядке в строку Б. Посчитайте сколько одинаковых букв находятся на...

Функция, возвращающая количество одинаковых слов в строках, переданных параметрами
Помогите пожалуйста!!! Напишите функцию в Паскале, которая принимает в качестве аргументов две...

Последовательность Хемминга (чуть усложнёное)
последовательность Хемминга образуют например числа не имеющие других простых делителей кроме...

0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
30.10.2011, 17:32

программы усложненной структуры, обработка двухмерных массивов, использование стандартных функций для работы с массивами, сортировка массивов.
Искала задачи, нашла в с++, а нужно в паскале сотворить следующее. Использование стандартных...

Преобразование восьмизначного усложненного значения x в массив литер-цифр, образующих запись числа
помогите пожалуйста!!!! Написать фрагмент программы преобразования восьмизначного усложненного...

Задана целочисленная матрица. Во сколько раз сумма элементов, стоящих на четных строках, больше, чем на нечетных строках.
Помогите с решением такой вот задачки: Задана целочисленная матрица. Во сколько раз сумма...

Определить, что больше сумма элементов в четных строках или произведение элементов в нечетных строках матрицы
Ребята, помогите пожалуйста кто может, код программы нужен. Заранее огромное спасибо Дан...

Найти наибольшие элементы в чётных строках матрицы, а наименьшие в нечётных строках
Дана матрица n*m. Найти наибольшие элементы в чётных строках, а наименьшие в нечётных строках. ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Новые блоги и статьи
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого
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: Математический инвариант ОДУ и рок Стивов-бонобо Главная задача разработанной «Модели Всего» — наглядно продемонстрировать наличие системной «судьбы». . .
Оттачиваю умение писать js программы.
russiannick 30.08.2026
Проектом выходного дня стало написание Книги шифров Виженера. Итогом стала версия 200, синий туман. Синий туман назван так, потому что замораживает текст под собой. Нажатие синих кнопок управляют. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru