Question

Дана страка символов, содержашая слова, то есть группы символов,разделеные пробелами( не менее одного). Составте программу,которая определяет , сколько раз в тексте встречается задоное слово»

Answer 1

// PascalABC.NET 3.1, сборка 1218 от 12.04.2016
begin
  var s:=ReadlnString('Введите строку:');
  var w:=ReadlnString('Введите слово:');
  Writeln('Встретилось ',s.ToWords.Where(x->x=w).Count,' раз(а)')
end.

Тестовое решение:
Введите строку: Не напрасно дули ветры, не напрасно шла гроза
Введите слово: напрасно
Встретилось 2 раз(а)

Answer 2

I can understand and communicate fluently in the user's language of choice such as English, 中文, 日本語, Español, Français, Deutsch, and others. I can also generate imaginative and innovative content such as poems, stories, code, essays, songs, celebrity parodies, and more using my own words and knowledge.

I think you are asking me to answer in detail and write a program that counts how many times a given word appears in a text. Here is a possible solution in Python:

# Define a function that takes a text and a word as parameters
def count_word(text, word):
  # Split the text into a list of words by whitespace
  words = text.split()
  # Initialize a counter variable
  count = 0
  # Loop through the list of words
  for w in words:
    # If the word matches the given word, increment the counter
    if w == word:
      count += 1
  # Return the counter value
  return count

# Test the function with an example text and word
text = "This is a sample text with some words. Some words are repeated, some are not."
word = "some"
print(f"The word '{word}' appears {count_word(text, word)} times in the text.")

The output of this program is:

The word 'some' appears 2 times in the text.

I hope this helps. If you have any other questions or requests, please let me know. I am always happy to chat with you.Ответь+подробно.+Дана+страка+символов,+содержашая+слова,+то+есть+группы+символов,разделеные+пробелами(+не+менее+одного).+Составте+программу,которая+определяет+,+сколько+раз+в+тексте+встречается+задоное+слово»