Есть ответ 👍

какое слово получится после нажатий клавиш,если курсор находится после буквы .Комбинация:← «Del» «Ф» → → «Р» → «BackSpace».

177
236
Посмотреть ответы 1

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


Var s: string;   // строка текста     i,lf: integer;   // lf - номер первого символа отдельного слова в строке                     // i - переменная цикла, для просмотра строки begin   write('строка: ');   readln(s);   // считывание слова   i: =1; lf: =1;   // i: =1; - текущий символ слова - первый                 // lf: =1;   - lf указывает на первый символ слова       repeat       // цикл по строке      if s[i]=' ' then   // если очередной символ строки - пробел, то     begin               // начало блока операторов       if uppercase(s[i-1])=uppercase(s[lf]) then   // если последний символ текущего                             // слова равен первому символу слова без учета регистра, то       begin                 // начало блока операторов          delete(s,lf,i-lf+1);   // удаляем слово вместе с пробелом справа         i: =lf;                 // i: =lf;   - переменная i указывает на следующее слово       end                     // конец блока операторов         else lf: =i+1;           // иначе, если первый символ слова не равен                               // последнему символу слова, устанавливаем lf на                               // первый символ следующего слова      end;                       // конец блока по условию, что очередной символ - пробел     i: =i+1;                   // переходим к следующему символу в строке   until   > length(s);           // если номер очередного символа строки больше длины                               // строки, то выход из цикла по строке                               // если в последнем слове текста есть совпадения                               // первого и последнего символа   if s[length(s)] in ['.','? ','! '] then   // если текст заканчивается одним из знаков           if s[lf]=s[length(s)-1] then delete(s,lf-1,length(s)-lf+1) // сравниваем с предпоследним                               // если равны, то удаляем последнее слово         else                     // иначе ничего не делаем       else if s[lf]=s[length(s)] then delete(s,lf-1,length(s)-lf+2);   // если последний                               // символ не то сравниваем первый символ последнего                               // слова с последним символом текста, если равны,                               // то удаляем последнее слово   writeln('новая строка: ',s);   // выводим новую строку на экран end.     // конец программы строка: это озеро около заповедника. новая строка: это заповедника.строка: около этого заповедника находится озеро. новая строка: этого заповедника находится.строка: озеро около заповедника новая строка: заповедника

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

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

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

Caktus Image

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

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

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

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

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

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

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

GTP TOP NEWS