Написать код дан файл, содержащий текст на языке и некоторые два слова. определить, сколько раз они встречаются в тексте и сколько из них — непосредственно друг за другом.

241

437

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

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

HAHAEZ2010

Информатика

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

Program primer; var f: text; i, j, h: byte; l, k: smallint; s, s1, s2, m: string; begin assign(f, 'f.txt'); {путь к файлу} reset(f); read(f, s); s : = ' ' + s + ' '; close(f); writeln('укажите 2 слова через строчку'); readln(s1); readln(s2); i : = 0; j : = 0; m : = s; k : = 1; while k < > 0 do begin k : = pos(' ' + s1 + ' ', m); if (k < > 0) then inc(i); delete(m, 1, k + length(s1)); end; k : = 1; m : = s; while k < > 0 do begin k : = pos(' ' + s2 + ' ', m); if (k < > 0) then inc(j); delete(m, 1, k + length(s2)); end; m : = s; k : = 1; h: =0; while (k < > 0) or (l < > 0) do begin k : = pos(' ' + s1 + ' ' + s2 + ' ', m); l : = pos(' ' + s2 + ' ' + s1 + ' ', m); if (k < > 0) or (l < > 0) then inc(h); delete(m, 1, k + l + length(s2 + s1) + 1); end; writeln('количество слов соответствующих первому = ', i); writeln('количество слов соответствующих второму = ', j); writeln('непосредственно друг за другом х', h); end.

kizzka

Информатика

4,5(11 оценок)

ctrl + alt + delete -> вкладка автозагрузка -> і відключаєте собі непотрібні програми

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

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

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

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

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

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

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

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

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

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