Поделитесь своими знаниями, ответьте на вопрос:
1. Завантаж файли презентацій, імена яких записано в таблиці, 2. Визнач мету створення цих презентацій і можливу аудиторіюДоповни порожні клітинки таблиці 7 у зошиті.Таблиця 7Де можнапродемонстру-вати?Ім'я файлаДля когостворена?Яким єпризначенняпрезентації?Продемонстру-вати історичніпам'ятки УкраїниСім чудесУкраїнихарчування про них, На уроці3 основздоров'яАвіамоделіДля членівгуртка юнихавіаконструк-торів
var
s,w:string;
begin
Write('Введите предложение: '); Readln(s);
Write('Введите искомое слово: '); Readln(w);
s:=' '+s+' ';
if Pos(' '+w+' ',s)>0 then Writeln('Слово входит в предложение')
else Writeln('Слово не входит в предложение')
end.
Тестовые решения:
Введите предложение: А роза упала на лапу Азора
Введите искомое слово: роза
Слово входит в предложение
Введите предложение: Вчера смотрели старую кинопанораму
Введите искомое слово: кино
Слово не входит в предложение
Введите предложение: Интересное было кино или так себе?
Введите искомое слово: кино
Слово входит в предложение
Замечание: В программе было обращено внимание на то, что "слово" не может быть частью другого слова, а должно являться самостоятельным членом предложения. В противном случае принято говорить не о слове, а о контексте (подстроке)