Есть ответ 👍

Написать программу в паскале: дана строка текста. слова в тексте друг от друга отделяются одним пробелом. удалить из строки все слова, начинающиеся и заканчивающиеся на "о".

144
374
Посмотреть ответы 2

Ответы на вопрос:

NIKROSO
4,5(68 оценок)

Var   ptr: integer; function getword(s: string): string; // возвращает очередное слово из строки s или пустое значение, // если в строке больше нет слов. // перед вызовом позиция начала слова указывается переменной ptr. // перед выходом ptr устаналивается на границу следующего слова // ptr=0 означает, что вся строка просмотрена. var   n, p: integer; begin   n : = length(s);   if (ptr > = n) or (ptr=0) then begin       ptr : = 0;       result : = ''   end   else begin       p : = posex(' ', s, ptr);       if p > 0 then begin           result : = copy(s, ptr, p - ptr);           ptr : = p + 1       end       else begin           result : = copy(s, ptr, n - ptr + 1);           ptr : = 0       end   end end; var   s1, s2, s: string;   n: integer; begin   writeln('вводите строку');   readln(s1);   ptr : = 1;   s2 : = '';   repeat       s : = getword(s1);       n : = length(s);       if n > 0 then           if (s[1] < > 'о') or (s[n] < > 'о') then               s2 : = s2 + s + ' '   until n = 0;   n : = length(s2);   if s2[n] = ' ' then       s2 : = copy(s2, 1, n - 1);   writeln('результирующая строка: ', s2) end. тестовый прогон: вводите строку в это окно отлично виден и прекрасный горный ландшафт, и одинокое облако, зацепившееся за покрытую снегом вершину. результирующая строка: в это виден и прекрасный горный ландшафт, и одинокое облако, зацепившееся за покрытую снегом вершину.
ATAT1
4,4(98 оценок)

Минулого літа я з батьками відпочивав на морі. ми часто приходили на пляж поблизу невеличкої пристані. хлопчикам дуже стрибати там у воду. якось я помітив, що десь по обіді біля пристані з'являється величезний чорний собака. у нього довга шерсть, блискучі карі очі. за такої літньої спеки він відразу кидається в море й пливе ближче до того місця, де збираються стрибуни. там він очікує хлопчиків чи дівчаток, які будуть стрибати у воду. спершу було незрозуміло, чому він пливе саме туди. та підійшовши ближче, я усе второпав. собака чекає, поки хтось стрибне, випірне, а він уже поруч, і дітлахи із задоволенням хапаються за його спину, загривок або просто за шерсть, навіть за хвоста. і дар (так кличуть собаку) із усіх сил прямує до берега. усім дуже весело. одного разу прийшов ігор іванович — хазяїн собаки, і я запитав про дивну поведінку дара. ігор іванович розповів, що це сталося кілька років тому. маленька дівчинка стояла на пристані, оступилася і впала у воду. дорослі кинулися їй, але дар випередив усіх. дівчинка вхопилася рученятами за шерсть собаки, а він із усіх сил чимдуж поплив до берега. і з тих пір він нібито рятує всіх дітей, які бавляться на пристані. мені теж було приємно пливти до берега, тримаючись за чорну спину дара.

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

Популярно: Информатика

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.
  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
  • В чем отличия от ChatGPT?

    otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.

Подпишись на наш телеграмм канал

GTP TOP NEWS