Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.75/8: Рейтинг темы: голосов - 8, средняя оценка - 4.75
0 / 0 / 0
Регистрация: 01.12.2011
Сообщений: 7

Нужно найти строки, в которых стоят две В в начале или в конце(вывести YES); и строки, где в середине идет подряд три В(вывести NO)

18.04.2012, 14:17. Показов 1733. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Дано некоторое количество строк с символами А и В. Нужно найти строки, в которых стоят две В в начале или в конце(вывести YES); и строки, где в середине идет подряд три В(вывести NO). Например
4
AAВВ YES
ABBBA NO
AAA -
AABB YES
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
18.04.2012, 14:17
Ответы с готовыми решениями:

Вывести из строки только те символы, которые стоят по две заглавные
Помогите с регулярными выражениями, нужно вывести из строки только те которые стоят по две заглавные.(Где 1 или 3 заглавных то их не...

Определить все пары слов, в начале/конце которых находится более 3-х гласных или согласных букв подряд
В заданной строке английского текста определите все пары слов, которые читаются неудобно. Такими будем считать слова, в начале или в конце...

Ввести элементы двумерного массива с клавы С++.Нужно вывести его на экран в виде таблицы, в конце каждой строки надо вывести самый большой элемент
Вот мой код : #include <iostream> #include <Windows.h> using namespace std; using std::cout; using std::cin; int...

1
 Аватар для BumerangSP
4311 / 1423 / 463
Регистрация: 16.12.2010
Сообщений: 2,939
Записей в блоге: 3
18.04.2012, 16:14
Лучший ответ Сообщение было отмечено Мирааа как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
uses crt;
var i,j,n: integer;
    s: string;
begin
 clrscr;
 write('Kol-vo: ');
 readln(n);
 for i:=1 to n do
  begin
   readLN(s);
   j:=(length(s) DIV 2)+1;
   if ((s[1]='B') and (s[2]='B')) or
      ((s[length(s)]='B') and (s[length(s)-1]='B')) then
    writeln('Yes')
   else
    if (s[j]='B') and (s[j-1]='B') and (s[j+1]='B') then
      writeln('NO')
     else
      writeln('-');
   end;
 readln;
end.
Прим.: раз уж нужно подряд 3 в середине, то количество символов в строке должно быть нечетно.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
18.04.2012, 16:14
Помогаю со студенческими работами здесь

Вывести только символы из набора, у которых последний пробел находится в середине либо после середины строки
Разработать функцию LastSpace(const S:string):integer, определяющую позицию последнего пробела в строке S. С помощью данной функции вывести...

Подсчёт серий строки, где подряд идёт 2 раза 'ДА'
Задачи. 1) нужно заполнить нашу строку(в строке 20 колонок)StringGrid'a случайными значениями. Их всего два. Это: 'ДА' и 'НЕТ'. 2)...

Обрезать тег <br /> только в конце или в начале строки
Здравствуйте товарищи. Нуждаюсь в вашей помощи. И сразу к делу. Мне нужно обрезать теги &lt;br /&gt; при условии если они...

Поиск grep-ом шаблона в начале ИЛИ в конце строки
Хай всем. Нужна хелпа. Нужно сконструировать для grep регулярное выражение, которое выводит строки, начинающиеся с «ta» или...

Строки и множества: если в слове две подряд идущие гласные, то вывести эти слова на экран
если в слове две подряд идущие гласные, то вывести эти слова на экран ______________ помогите пожалуйста)))


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Модель заражения группы наркоманов
alhaos 17.04.2026
Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .
Мысли в слух. Про "навсегда".
kumehtar 16.04.2026
Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .
My Business CRM
MaGz GoLd 16.04.2026
Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .
Знаешь почему 90% людей редко бывают счастливыми?
kumehtar 14.04.2026
Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.
Фиксация колонок в отчете СКД
Maks 14.04.2026
Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .
Настройки VS Code
Loafer 13.04.2026
{ "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .
Оптимизация кода на разграничение прав доступа к элементам формы
Maks 13.04.2026
Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .
Контроль заполнения и очистка дат в зависимости от значения перечислений
Maks 12.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru