0 / 0 / 0
Регистрация: 22.12.2016
Сообщений: 30

Из каждой группы подряд идущих одинаковых слов составить только одно (с использованием указателей)

22.12.2016, 14:16. Показов 802. Ответов 4
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Имеется список слов. Из каждой группы подряд идущих одинаковых слов составить только одно.
Нужно использовать указатели. Можете хотя бы начало показать?
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
22.12.2016, 14:16
Ответы с готовыми решениями:

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

Из каждой группы подряд идущих одинаковых элементов оставить только один
Составить программу, которая в списке L из каждой группы подряд идущих одинаковых элементов оставляет только один. С объяснениями что как...

Из каждой группы подряд идущих слов оставить только одну
Пусть будет дан список слов. Из каждой группы подряд идущих слов оставить только одну.

4
Модератор
 Аватар для D1973
9854 / 6393 / 2453
Регистрация: 21.01.2014
Сообщений: 27,175
Записей в блоге: 3
22.12.2016, 14:36
Цитата Сообщение от Red55 Посмотреть сообщение
Нужно использовать указатели.
Зачем?
0
0 / 0 / 0
Регистрация: 22.12.2016
Сообщений: 30
22.12.2016, 14:37  [ТС]
Такое условие.
0
22.12.2016, 15:05

Не по теме:

М-да... Главное не как проще, а "чтобы вы все задолбались"

0
0 / 0 / 0
Регистрация: 22.12.2016
Сообщений: 30
22.12.2016, 17:40  [ТС]
Начало.У меня что-то в этом роде получилось:
Delphi
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
34
35
36
37
38
39
type
  TPList = ^TList;
  TList = record
    Str :string;
    PNext:TPList;
  end;
 
 
implementation
 
{$R *.dfm}
 
 
 
procedure TForm1.Button1Click(Sender: TObject);
var
  Element:TPList;
  TList:TPlist;
  I:byte;
  listWords:TStringList;
 
begin
  listWords := TStringList.Create();
  listWords.Add('Один');
  listWords.Add('Один');
  listWords.Add('Два');
  listWords.Add('Москва');
  listWords.Add('Москва');
 
  for i := 0 to listWords.Count - 1 do
  begin
     New(Element);
     Element^.Str :=   listWords[i];
     Element^.PNext := nil;
  end;
 
 
 
end;
Правильное начало?

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

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

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

Из каждой группы подряд идущих элементов оставить только один
Дан список строк. Написать подпрограмму, которая из каждой группы подряд идущих элементов оставляет только один.

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

В списке целых чисел удалить из каждой группы подряд идущих одинаковых элементов все, кроме одного
Здравствуйте, Вы не могли бы помочь с задачей контрольной работы? "Составить программу. В списке целых чисел удалить из каждой...


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

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Опции темы

Новые блоги и статьи
Тестирование Pull Request в Kubernetes с vCluster
Mr. Docker 19.07.2025
Часто сталкиваюсь с серьезной дилемой при настройке тестовых окружений для проверки Pull Request в Kubernetes. С одной стороны, каждый PR требует изолированной среды — только так можно гарантировать,. . .
Мой 7 минутный ролик с крамольным предложением про шахматы, предлагаю заценить
_Ivana 18.07.2025
p2UhJNMGY94
Десять Middleware Node.js для эффективного кодинга
Reangularity 18.07.2025
Когда я только начинал работать с Node. js, количество пакетов в npm меня буквально парализовало. Сегодня их больше 1,3 миллиона — попробуй разберись, что стоит твоего внимания, а что нет. Я потратил. . .
Context и глубины Android
mobDevWorks 18.07.2025
В Android разработки Context напоминает воздух - он везде, жизненно необходим, но мало кто может детально объяснить его природу. Мы привыкли получать его как параметр, передавать дальше и. . .
Результаты исследования от команды MCM (июль 2025 г.)
Programma_Boinc 18.07.2025
Результаты исследования от команды MCM (июль 2025 г. ) Как сообщалось в наших предыдущих публикациях, мы изучаем гены, которые имеют наибольший рейтинг и ассоциируются с различными видами рака, в. . .
ИИ-чатбот на React с OpenAI и LangChain.js
Reangularity 17.07.2025
React давно стал для меня золотым стандартом фронтенд-разработки. Его компонентная структура, виртуальный DOM и однонаправленный поток данных идеально подходят для создания динамичных интерфейсов. . .
Пишем адаптер для локального хранилища S3 на C#
stackOverflow 16.07.2025
Разработка современных приложений часто требует интеграции с объектными хранилищами, и Amazon S3 стал де-факто стандартом в этой области. Однако работа с облачными сервисами в процессе разработки. . .
Старые замки
kumehtar 16.07.2025
Смотрел тут фото, попались пара старых замков. И сразу бросилось в глаза из отличие. Например: Замок Бистон, в англии. Разрушенное сооружение. Но - не испорченное людьми, по крайней мере - на. . .
Java и Eclipse Store: Сверхбыстрые приложения с In-Memory DB
Javaican 15.07.2025
Eclipse Store — это микро-движок персистентности для Java, который позволяет хранить и извлекать нативные Java-объекты без необходимости преобразования данных или использования объектно-реляционного. . .
EmBitz, создание проекта, отладка, прошивка
locm 15.07.2025
Создание проекта для Blue Pill (STM32F103C8T6) в EmBitz 2. 30, написания кода blink, запуск отладки в ОЗУ, заливка релизной прошивки во flash используя ST-Link и др. . . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru