Pascal. вводится предложение. записать в файл слова начинающиеся с букв от 'м' до 'я'

232

406

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

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

Harebin

Информатика

4,6(28 оценок)

// pascalabc.net 3.0, сборка 1066 var s, wd: string; n, pt: integer; begin write('введите строку: '); readln(s); n : = length(s); pt : = 1; repeat // пропускаем все символы до первого непробельного while pt < = n do if s[pt] = ' ' then inc(pt) else break; if pt < = n then begin // выделяем очередное слово wd : = ''; while pt < = n do if s[pt] < > ' ' then begin wd : = wd + s[pt]; inc(pt) end else break; if (wd < > '') and (lowcase(wd[1]) in ['м'..'я']) then writeln(wd) end until pt > n; end. тестовое решение: введите строку: **а роза упала на лапу азора ** роза упала на а вот так версия 3.0 позволяет решить "по-современному": // pascalabc.net 3.0, сборка 1066 begin var s: =readstring('введите строку: '); writeln('результат: ',s.towords(' ').where(x-> x[1] in ['м'..'я'])) end. тестовое решение: введите строку: **а роза упала на лапу азора ** результат: [роза,упала,на]

karisha119

Информатика

4,4(66 оценок)

Среда не уточнялась < meta charset = "utf-8"> < script type="text/javascript"> // a и b - длины , h - высота , s- площадь. var a = prompt("введите длину первого основания"); var b = prompt("введите длину второго основания"); var h = prompt("введите длину высоты") ; var s; a = parseint(a); b = parseint(b); h = parseint(h); s = parseint(h); s = ((a+b)/2)*h; alert("площадь данной трапеции" + s); < /script>

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

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

Задай свой вопрос

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

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

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

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

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

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

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