выяснить, имеется ли среди S1,…,Sn пара соседствующих букв ”НО” или ”ОН” - Паскаль, Turbo Pascal, PascalABC.NET

Zhasik · 27.12.2010, 07:42

Даны натуральное число n и символы S1,…,Sn
b) выяснить, имеется ли среди S1,…,Sn пара соседствующих букв ”НО” или ”ОН”.

Stilet · 27.12.2010, 08:53

А тут в чем сложность?

Код:

if (s[i] in ['H','O'])and(s[i+1] in ['H','O'])and(s[i]<>s[i+1])

NioTo · 27.12.2010, 10:11

Код:

if (S[i] + S[i + 1] = 'НО') or (S[i] + S[i + 1] = 'ОН') then ...

27.12.2010, 07:42	#1
Zhasik Пользователь Регистрация: 27.12.2010 Сообщений: 18	выяснить, имеется ли среди S1,…,Sn пара соседствующих букв ”НО” или ”ОН” Даны натуральное число n и символы S1,…,Sn b) выяснить, имеется ли среди S1,…,Sn пара соседствующих букв ”НО” или ”ОН”.

27.12.2010, 08:53	#2
Stilet Белик Виталий :) Старожил Регистрация: 23.07.2007 Сообщений: 57,097	А тут в чем сложность? Код: `if (s[i] in ['H','O'])and(s[i+1] in ['H','O'])and(s[i]<>s[i+1])` I'm learning to live...

27.12.2010, 10:11	#3
NioTo Пользователь Регистрация: 17.12.2007 Сообщений: 32	Код: `if (S[i] + S[i + 1] = 'НО') or (S[i] + S[i + 1] = 'ОН') then ...`

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Borland C++ Выяснить,имеются ли в последовательности пара соседствующих одинаковых символов	andreyko1991	Помощь студентам	5	16.12.2010 08:47
выяснить, встречается ли в данном тексте группа букв one;	hidalgo	Фриланс	7	19.01.2010 10:57
Delphi:Определить имеется ли среди чисел a,b,c хотя бы одна пара взаимно противоположных чисел.	Skvot	Помощь студентам	6	27.04.2009 11:47
c#, в тексте имеется пара символов непонятного назначения	byte916	Помощь студентам	4	17.11.2008 02:19
массы n идентичных на вид монет среди которых одна фальшивая - легче или тяжелее остальных	Wintrymoon	Паскаль, Turbo Pascal, PascalABC.NET	14	10.03.2008 23:10