Задачка по паскалю (⋋▂⋌)
_________________
имеется текст, состоящий из русских слов, разделенных между собой пробелом. все буквы в тексте прописные.
есть ли слова в предложении, которые начинаются с "лес". если да, то сколько их (по лесу ходит лесник. ответ: есть, два слова)

// PascalABC.Net 3.0, сборка 1066
begin
  var s:=ReadString(Введите текст :);
  Write(Количество повторов "ЛЕС" равно ,
    s.Split( ).Where(x->Copy(x,1,3)=ЛЕС).Count);
end.

Тестовые примеры:
Введите текст : ПО ЛЕСУ ХОДИТ ЛЕСНИК
Количество повторов "ЛЕС" равно 2

Введите текст : ЛЕС, ПОДЛЕСОК, ПЕРЕЛЕСОК- ДОЖДЬ ЗАСТАЛ МЕНЯ В ПУТИ...
Количество повторов "ЛЕС" равно 1

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку