В заданном тексте указать, сколько раз встречается в тексте первое слово

@o_serobaba · Регистрация: 09.07.2013

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

помогите пожалуйста!!!!п

@Cyborg Drone · 09.07.2013, 22:03

Будем считать словом последовательность символов, отличных от символа "пробел", оканчивающуюся символом "пробел".

Pascal

program cntw;
 
var s, p: string; //строка и слово
    i: integer; //счётчик
 
begin
  writeln('Enter text string:');
  readln(s);
  s := s + ' '; //в конце строки добавляем пробел - для упрощения
  while pos (' ', s) = 1 do delete(s, 1, 1); //удаляем пробелы в начале строки
  i := 0; //пока слов нет
  p := copy(s, 1, pos(' ', s)); //копируем первое слово
  while pos(p, s) > 0 do // цикл поиска слов
    begin
      delete(s, pos(p, s), length(p)); //нашли, удаляем из строки
      i := i + 1 //инкремент счётчика
    end;
  writeln('Count of word "', p, '": ', i); //печатаем слово и количество
  readln //ждём-с <Enter>
end.

Всего доброго.

Новые блоги и статьи
Преобразование полей (элементов управления содержимым) в обычный текст РоΜа 23.01.2025 Возникла необходимость преобразовать поля в текст (те, что на вкладке разработчик добавляются) . Помучившись родил следующее: Sub ПоляВТекст() Преобразует все поля в текст (даты, текст,. . .	Как проверить существование директории в скрипте Bash bt_guru 23.01.2025 При разработке скриптов Bash одной из ключевых задач является корректная работа с файловой системой, где особое место занимает проверка существования директорий. Эта операция становится критически. . .	Как работают срезы (slice) в Python bytestream 23.01.2025 Python предоставляет разработчикам мощный и гибкий инструмент для работы с последовательностями данных - срезы (slices). Эта функциональность позволяет извлекать, модифицировать и управлять. . .	Как удалить подмодуль (submodule) в Git bytestream 23.01.2025 При работе с крупными проектами в системе контроля версий Git разработчики часто сталкиваются с необходимостью управления зависимостями и внешними компонентами. Подмодули (submodules) представляют. . .	В чем разница между @staticmethod и @classmethod в Python. Декораторы методов bytestream 23.01.2025 В Python декораторы методов представляют собой мощный инструмент, позволяющий модифицировать поведение функций и методов без изменения их исходного кода. Эта возможность является одной из. . .	Как преобразовать InputStream в String в Java bytestream 23.01.2025 В мире Java-разработки работа с потоками данных является одной из ключевых операций при создании современных приложений. InputStream, как фундаментальный класс для обработки входных потоков данных,. . .
Как обновить форк (ответвление) репозитория в Git bytestream 23.01.2025 Одним из наиболее мощных инструментов Git для организации совместной работы является механизм форкинга репозиториев, который позволяет создавать независимые копии проектов для дальнейшей разработки. . . .	Как работает async/await в C#. Асинхронное программирование в .NET bytestream 23.01.2025 Введение в асинхронное программирование Асинхронное программирование представляет собой важнейшую концепцию современной разработки программного обеспечения, особенно в контексте создания. . .	КуМир: полное руководство bytestream 23.01.2025 Введение в КуМир: история создания и назначение КуМир (Комплект Учебных МИров) представляет собой образовательную среду программирования, которая была создана для обучения основам алгоритмизации и. . .	Что такое OLAP. Где и как использовать многомерный анализ данных bytestream 23.01.2025 Введение в OLAP-технологии В современном мире бизнес-аналитика и обработка больших массивов данных играют ключевую роль в принятии стратегических решений. Организации накапливают огромные объемы. . .	MongoDB: что это, для чего нужна и как использовать bytestream 23.01.2025 Введение в MongoDB: современная документоориентированная СУБД В современном мире разработки программного обеспечения выбор правильной системы управления базами данных является критически важным. . .	Как использовать закрытый ключ шифрования в Git. Шифрование в Git bytestream 23.01.2025 Установка и настройка закрытых ключей в Git предоставляет дополнительный уровень безопасности для работы с репозиториями. Для начала необходимо создать пару ключей, обычно это осуществляется с. . .

@o_serobaba 0 / 0 / 0 Регистрация: 09.07.2013 Сообщений: 69
		1
	В заданном тексте указать, сколько раз встречается в тексте первое слово 09.07.2013, 17:18. Показов 1900. Ответов 1 Метки нет (Все метки) помогите пожалуйста!!!!п 0

	09.07.2013, 22:03

Опции темы

В заданном тексте указать, сколько раз встречается в тексте первое слово

Решение