Информатика, опубликовано 2018-08-22 18:32:06 by Гость
Задано предложение y состоящее из слов строк.проверить встречается ли данное слово x в предложении y.Паскаль СРОЧНО ребят.
Ответ оставил Гость
// PascalABC.NET 3.1, сборка 1230 от 27.04.2016
begin
var y:=ReadlnString(Предложение:).ToWords;
var x:=Readlnstring(Слово:);
if y.Where(w->w=x).Any then Writeln(Найдено)
else Writeln(Не найдено)
end.
Тестовые решения:
Предложение: а роза упала на лапу азора
Слово: лапу
Найдено
Предложение: а роза упала на лапу азора
Слово: лапа
Не найдено
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на