Студопедия — PROGRAM PRG5_1;
Студопедия Главная Случайная страница Обратная связь

Разделы: Автомобили Астрономия Биология География Дом и сад Другие языки Другое Информатика История Культура Литература Логика Математика Медицина Металлургия Механика Образование Охрана труда Педагогика Политика Право Психология Религия Риторика Социология Спорт Строительство Технология Туризм Физика Философия Финансы Химия Черчение Экология Экономика Электроника

PROGRAM PRG5_1;






VAR STR, WRD: STRING;

I, L: INTEGER;

M: SET OF CHAR;

BEGIN

M:= ['.', ',', '!', ':',';', '?'.'-', ' '];

WRITELN('BBEДИTE СЛОВО');'

READLN(WRD);

WRD:= CONCAT(' ', WRD);

STR:= ' '+STR;

WRITELN('ВВЕДИТЕ ТЕКСТ');

READLN(STR);

L:= LENGTH(WRD);

REPEAT

I:= POS(WRD, STR);

IF (IO0) AND (STR[I+L] IN M) THEN DELETE(STR, I, L);

UNTIL 1 = 0;

WRITELN(STR)

ЕND.

Для решения задачи:

- формируем тело программы и описываем переменные;

- задаем значение множества М - множества знаков препина­ния и пробел;

- вводим слово WRD; присоединяем вначале его пробел, чтобы не спутать с подсловом; находим длину слова;

- вводим строку STR;

- цикл REPEAT... UNTIL I = 0 осуществляет просмотр строки до тех пор, пока в ней встречается слово WRD;

- значение I>0 указывает на номер символа в строке, с кото­рого начинается слово WRD;

- если такое слово найдено, то вырезаем его из строки;

- выводим на экран модифицированный текст.

Переменные:

I - номер позиции, начиная с которой встречается слово WRD;

L - длина слова;

STR - строка текста;

WRD - слово;

М - множество знаков препинания и пробел.

 

ВВЕДИТЕ СЛОВО

АВВА

ВВЕДИТЕ ТЕКСТ

DFE ABBA DFGSABBA ВВВВ

DFE DFGSABBA ВВВВ

 

ВВЕДИТЕ СЛОВО

**

ВВЕДИТЕ ТЕКСТ

DFE** ** *** ** DFGSABBA **BBBB

DFE** *** DFGSABBA **BBBB

 

Рис. 5.1. Результат работы PRG5_1

 

Задача 5.2 Дана строка символов. Выделить подстроку меж­ду первой и второй точкой.

PROGRAM PRG5_2;

VAR S1, STR: STRING;

I: INTEGER;

BEGIN

WRITELN('BBEДИTE ТЕКСТ');







Дата добавления: 2015-09-07; просмотров: 334. Нарушение авторских прав; Мы поможем в написании вашей работы!



Кардиналистский и ординалистский подходы Кардиналистский (количественный подход) к анализу полезности основан на представлении о возможности измерения различных благ в условных единицах полезности...

Обзор компонентов Multisim Компоненты – это основа любой схемы, это все элементы, из которых она состоит. Multisim оперирует с двумя категориями...

Композиция из абстрактных геометрических фигур Данная композиция состоит из линий, штриховки, абстрактных геометрических форм...

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

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

Случайной величины Плотностью распределения вероятностей непрерывной случайной величины Х называют функцию f(x) – первую производную от функции распределения F(x): Понятие плотность распределения вероятностей случайной величины Х для дискретной величины неприменима...

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

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

Педагогическая структура процесса социализации Характеризуя социализацию как педагогический процессе, следует рассмотреть ее основные компоненты: цель, содержание, средства, функции субъекта и объекта...

Типовые ситуационные задачи. Задача 1. Больной К., 38 лет, шахтер по профессии, во время планового медицинского осмотра предъявил жалобы на появление одышки при значительной физической   Задача 1. Больной К., 38 лет, шахтер по профессии, во время планового медицинского осмотра предъявил жалобы на появление одышки при значительной физической нагрузке. Из медицинской книжки установлено, что он страдает врожденным пороком сердца....

Studopedia.info - Студопедия - 2014-2024 год . (0.008 сек.) русская версия | украинская версия