Дана страка символов, содержашая слова, то есть группы символов,разделеные пробелами( не менее одного). Составте программу,которая определяет , сколько раз в тексте встречается задоное слово»
// 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 раз(а)
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
