Ответы на вопрос:
//pascal abc.net версия 2.2 сборка 790 var s,sub: string; begin; writeln('введите предложение: '); readln(s); writeln('введите слово: '); readln(sub); if pos(sub,s)< > 0 then writeln('да') else writeln('нет'); //pos() возвращает позицию подстроки в строке. если её нет, возвращает 0 end.пример работы программы: введите предложение: глеб не любит велосипедывведите слово: велосипедыда
//pascalabc.net 3.0, сборка 1064 var s,w: string; begin write('введите предложение: '); readln(s); write('введите искомое слово: '); readln(w); s: =' '+s+' '; if pos(' '+w+' ',s)> 0 then writeln('слово входит в предложение') else writeln('слово не входит в предложение') end. тестовые решения: введите предложение: а роза упала на лапу азора введите искомое слово: роза слово входит в предложение введите предложение: вчера смотрели старую кинопанораму введите искомое слово: кино слово не входит в предложение введите предложение: интересное было кино или так себе? введите искомое слово: кино слово входит в предложение замечание: в программе было обращено внимание на то, что "слово" не может быть частью другого слова, а должно являться самостоятельным членом предложения. в противном случае принято говорить не о слове, а о контексте (подстроке)
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
shchepelevason13.11.2021 03:54
-
Ptigran24.05.2021 21:34
-
пипканегра30.11.2021 19:49
-
Ден0Морозов09.05.2022 16:29
-
nickita123098vp0a1b825.11.2020 18:34
-
HeLLDeViLL31.07.2022 21:51
-
СабинаЛис09.07.2021 17:21
-
8983633155226.11.2020 22:07
-
masya9013.03.2023 04:55
-
xottabыs421.03.2023 03:47
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.