Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Технологии > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail


Донат для форума - использовать для поднятия настроения себе и модераторам

А ещё здесь можно купить рекламу за 25 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru

Ответ
 
Опции темы
Старый 10.06.2010, 15:22   #1
Андрюха74
 
Регистрация: 08.06.2010
Сообщений: 8
Репутация: 10
По умолчанию Работа с символами.Паскаль

Пожалуйста напишите программу..........Даны символы s1,s2….Известно, что символ s1 отличеен от восклицательного знака и что среди s2,s3...... есть по крайнер мере один восклицательный знак....
пусть s1.....sn-символы данной последовательности, предшествующие первому восклицательному знаку(n=7).Выяснить, имеется ли среди S1......Sn пара соседствующих букв НО или ОН....
Андрюха74 вне форума   Ответить с цитированием
Старый 10.06.2010, 15:28   #2
Vikenty
Заслуженный флудер
Профессионал
 
Аватар для Vikenty
 
Регистрация: 31.03.2010
Адрес: Россия. Мск область
Сообщений: 1,473
Репутация: 561

icq: 612979261
По умолчанию

Помогу в ICQ 612979261
Vikenty вне форума   Ответить с цитированием
Старый 10.06.2010, 16:08   #3
DoDge_VipeR
Форумчанин
 
Аватар для DoDge_VipeR
 
Регистрация: 30.04.2010
Сообщений: 317
Репутация: 84
По умолчанию

Код:
i:=1;
s1:='';
while s[i]<>'!' do begin
s1:=s1+s[i];
inc(i);
end;
if pos ('OH',s1)<>0 then writeln ('Y')
else if pos ('HO',s1)<>0 then writeln ('Y')
else writeln('N');
__________________
icq:627719[сто сорок четыре] - помогу с Pascal & Delphi!
DoDge_VipeR вне форума   Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Обработка строк. Работа с символами. ardor Помощь студентам 2 03.01.2010 21:25
Рисование символами. (*_*) Общие вопросы C/C++ 2 05.03.2009 00:03
Работа с русскими символами... Sota Помощь студентам 5 31.05.2008 18:44


10:24.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.