Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.57/7: Рейтинг темы: голосов - 7, средняя оценка - 4.57
0 / 0 / 0
Регистрация: 12.06.2018
Сообщений: 2

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

12.06.2018, 18:21. Показов 1357. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Дана строка символов, поменять местами любые два слова начинающиеся на указанную букву.
Помогите пожалуйста, очень нужна программа.
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
12.06.2018, 18:21
Ответы с готовыми решениями:

Дана строка символов. Поменять местами i-е и j-е слова
Помогите решить задачу.Спасибо Дана строка символов, состоящая из произвольного текста на английском языке, слова разделены пробелами....

Дана строка символов. Поменять местами i-е и j-е слова.
Дана строка символов , состоящая из произвольного текста, слова разделены пробелами. Поменять местами i-е и j-е слова. С объяснением...

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

3
 Аватар для Hitoku
1755 / 1347 / 1407
Регистрация: 28.10.2016
Сообщений: 4,267
12.06.2018, 21:06
Слова чем разделены?
0
0 / 0 / 0
Регистрация: 12.06.2018
Сообщений: 2
12.06.2018, 21:43  [ТС]
Пробелами
0
 Аватар для Hitoku
1755 / 1347 / 1407
Регистрация: 28.10.2016
Сообщений: 4,267
12.06.2018, 22:22
Лучший ответ Сообщение было отмечено Alexandr Senkiv как решение

Решение

Ну вот как вариант:
Pascal
1
2
3
4
5
6
7
begin
  var (s, c) := (ReadlnString('Текст:').ToWords, char.Parse(ReadlnString('Буква:')));
  var ss := s.Select((v, i) -> new System.Collections.Generic.KeyValuePair<string, integer>(v, i))
    .Where(v -> v.Key.StartsWith(c)).ToArray;
  Swap(s[ss[Random(0, ss.Length)].Value], s[ss[Random(0, ss.Length)].Value]);
  writeln(s.JoinIntoString(' '));
end.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
12.06.2018, 22:22
Помогаю со студенческими работами здесь

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

Дана строка, надо поменять местами два слова, номера которых вводятся с клавиатуры
Я разделил строку на слова а дальше не получается(((

Дана символьная строка. Найти слова, начинающиеся и заканчивающиеся на одну и ту же букву
Дана символьная строка. Найти слова, начинающиеся и заканчивающиеся на одну и ту же букву.

С клавиатуры вводится строка символов. Удалить из строки все слова начинающиеся на букву А.
№2 Решите задачу с использование алгоритмического языка. Задача. С клавиатуры вводится строка символов. Удалить из строки все слова...

Дана строка символов. Слова в строке отделяются одним пробелом. Поменять местами самое длинное и самое короткое слово
8. Дана строка символов. Слова в строке отделяются одним пробелом. Поменять местами самое длинное и самое короткое слово. не могу...


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages
DevAlt 07.03.2026
Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
Модульный подход на примере F#
DevAlt 06.03.2026
В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .
Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование
8Observer8 05.03.2026
Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D
8Observer8 04.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .
SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий
8Observer8 02.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru