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

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

PROGRAM PRG4_4;






VAR STR: STRING;

L, I, J: INTEGER;

M: SET OF CHAR;

BEGIN

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

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

READLN(STR);

L:= LENGTH (STR);

FOR I:= 1 TO L DO

IF NOT(STR[I] IN M) THEN WRITE(STR[I])

ELSE BREAK;

FOR J:=l+1 TO L DO

WRITE(STR[J]);

WRITELN

END.

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

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

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

- цикл FOR I:= 1 ТО L DO осуществляет вывод строки до первого знака препинания;

- цикл FOR J:= 1+1 ТО L DO выводит строку после первого знака препинания;

- после вывода закрываем строку оператором WRITELN.

Переменные:

I, J - переменные циклов;

L - длина строки;

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

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

 

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

ABC DFG, GH,,,,,, ЕЕ.

ABC DFG GH,,,,,, ЕЕ.

 

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

; ABC DFG GH,,,,,, ЕЕ.

ABC DFG GH,,,,,, EE.

 

Рис. 4.1. Результат работы PRG4_4

Задача 4.5 Дана строка символов. Удалить из нее все знаки препинания.

PROGRAM PRG4_5;

VAR STR: STRING;

L, I: INTEGER;

M: SET OF CHAR;

BEGIN

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

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

READLN(STR);

L:= LENGTH(STR);

WRITELN('ПPEOBPA3OBAHHblЙ ТЕКСТ');

FOR I:= 1 TO L DO

IF NOT(STR[I] IN M) THEN WRITE(STR[I]);

WRITELN

END.

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

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

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

- цикл FOR I:= 1 ТО L DO осуществляет вывод строки без знаков препинания;

- после вывода закрываем строку оператором WRITELN.

Переменные:

I - переменная цикла;

L - длина строки;

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

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

Задача 4.6 Дана строка символов. Заменить в ней все воскли­цательные знаки на точки.

Данная программа представляет собой примитивный трансля­тор, который транслирует все символы в строке как они есть, а восклицательные знаки транслирует в точки.







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



Аальтернативная стоимость. Кривая производственных возможностей В экономике Буридании есть 100 ед. труда с производительностью 4 м ткани или 2 кг мяса...

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

Расчетные и графические задания Равновесный объем - это объем, определяемый равенством спроса и предложения...

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

Индекс гингивита (PMA) (Schour, Massler, 1948) Для оценки тяжести гингивита (а в последующем и ре­гистрации динамики процесса) используют папиллярно-маргинально-альвеолярный индекс (РМА)...

Методика исследования периферических лимфатических узлов. Исследование периферических лимфатических узлов производится с помощью осмотра и пальпации...

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

Шрифт зодчего Шрифт зодчего состоит из прописных (заглавных), строчных букв и цифр...

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

РЕВМАТИЧЕСКИЕ БОЛЕЗНИ Ревматические болезни(или диффузные болезни соединительно ткани(ДБСТ))— это группа заболеваний, характеризующихся первичным системным поражением соединительной ткани в связи с нарушением иммунного гомеостаза...

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