Я так понял, что это нужно написать на ЯП Pascal
Вот скриншот и прикрепленный файл с кодом.
Набирать здесь не буду из-за неудобочитаемости.
Работает стабильно, хоть и всегда можно реализовать как-то еще проще :)
upd: обновил фалы, теперь всё написано как надо
Program anton4nk;
uses crt;
var x, y : string;
begin
clrscr;
writeln('Введите имя и фамилию.');
readln(x,y);
writeln(x);
end.
Если я правильно конечно понял задачу. Если нет, отпиши.
А) В ответе будут все документы, в которых встречается слово чемпионы и слова бег и плавание встречаются в одном предложении.
б) В ответе будут документы, в которых в одном предложении есть слова чемпионы и плавание.
в) В ответе будут документы, в которых есть слова чемпионы, бег и плавание не зависимо от того, в одном они предложении или нет.
г) Здесь в одном предложении должны быть все слова: чемпионы, Европа, бег, плавание.
А вот графически не могу.