Задачка по паскалю (⋋▂⋌)
_________________
имеется текст, состоящий из русских слов, разделенных между собой пробелом. все буквы в тексте прописные.
есть ли слова в предложении, которые начинаются с "лес". если да, то сколько их (по лесу ходит лесник. ответ: есть, два слова)
// PascalABC.Net 3.0, сборка 1066
begin
var s:=ReadString(Введите текст :);
Write(Количество повторов "ЛЕС" равно ,
s.Split( ).Where(x->Copy(x,1,3)=ЛЕС).Count);
end.
Тестовые примеры:
Введите текст : ПО ЛЕСУ ХОДИТ ЛЕСНИК
Количество повторов "ЛЕС" равно 2
Введите текст : ЛЕС, ПОДЛЕСОК, ПЕРЕЛЕСОК- ДОЖДЬ ЗАСТАЛ МЕНЯ В ПУТИ...
Количество повторов "ЛЕС" равно 1
Оцени ответ
