51431

Работа со строками

Лабораторная работа

Информатика, кибернетика и программирование

Написать предикат выделения первого символа строки, первого символа подстроки в заданной строке. Листинг программы

Русский

2014-02-11

40 KB

1 чел.

Московский государственный технический университет им. Н.Э. Баумана

Калужский филиал

Отчет по лабораторной работе №5

«Работа со строками»

Вариант 10

Выполнил: студентка группы ЭВМ-81

Щукина А.К.

Проверил: Смирнов С.Г.

Калуга, 2013

Условие

Написать предикат выделения первого символа строки, первого символа подстроки в заданной строке.

Листинг программы

domains

s = string

c = char

i = integer

predicates

 first_symbol_of_string(s,c) % ВЫВОД ПЕРВОГО СИМВОЛА СТРОКИ

first_symbol_of_substring(s,s,i,c) % ВЫВОД ПЕРВОГО СИМВОЛА ПОДСТРОКИ В СТРОКЕ И ЕГО НОМЕРА

 first_symbol_of_substring1(s,s,i,c) % ПРОВЕРКА НА ПОДСТРОКУ

clauses

% ЕСЛИ СТРОКА ПУСТА, ТО ТАМ НЕТ СИМВОЛОВ

 first_symbol_of_string("",_):- write("STRING IS EMPTY"), nl.

% ВЫВОД ПЕРВОГО СИМВОЛА СТРОКИ

first_symbol_of_string(Str,Char):- frontchar(Str,Char,_), write(Char), nl.

 % ЕСЛИ СТРОКА ПУСТА, ТО ОНА НЕ СОДЕРЖИТ ПОДСТРОКУ

 first_symbol_of_substring("",_,_,_):- write("STRING HASN'T THIS SUBSTRING"), nl.

 % ЕСЛИ ПОДСТРОКА ПУСТА, ТО ЕЕ НЕТ В СТРОКЕ

 first_symbol_of_substring(_,"",_,_):- write("SUBSTRING IS EMPTY"), nl.

 % ИЩЕМ ПЕРВЫЙ СИМВОЛ СТРОКИ, СОВПАДАЮЩИЙ С ПЕРВЫМ СИМВОЛОМ ПОДСТРОКИ

 first_symbol_of_substring(Str,SubStr,NumChar,Char):-

frontchar(Str,Char,_),                  frontchar(SubStr,SubChar,_),

Char=SubChar,

first_symbol_of_substring1(Str,SubStr,NumChar,Char).

 % ЕСЛИ НЕ СОВПАДАЕТ, ТО ПРОВЕРЯЕМ СТРОКУ ДАЛЬШЕ И УВЕЛИЧИВАЕМ НОМЕР СИМВОЛА

 first_symbol_of_substring(Str,SubStr,NumChar,ResChar):-

frontchar(Str,_,TStr),

NumChar1 = NumChar + 1,

first_symbol_of_substring(TStr,SubStr,NumChar1,ResChar).

 % ЕСЛИ НАШЛИ СИМВОЛ СТРОКИ, СОВПАДАЮЩИЙ С ПЕРВЫМ СИМВОЛОМ ПОДСТРОКИ,

% ТО ПРОВЕРЯЕМ, ДЕЙСТВИТЕЛЬНО ЛИ МЫ НАШЛИ ПОДСТРОКУ В СТРОКЕ

 first_symbol_of_substring1(Str,SubStr,NumChar,ResChar):-

frontchar(Str,Char,TStr),

frontchar(SubStr,SubChar,TSubStr),

Char=SubChar,

first_symbol_of_substring1(TStr,TSubStr,NumChar,ResChar).

 % ЕСЛИ ДА, ТО ВЫВОДИМ НОМЕР СИМВОЛА В СТРОКЕ И САМ СИМВОЛ  

 first_symbol_of_substring1(_,"",NumChar,ResChar):- write(NumChar,"-",ResChar), nl.

goal

Str = "MY LITLE STRING",

SubStr = "RING",

write("STRING:"), nl,

write(Str), nl,

write("SUBSTRING:"), nl,

write(SubStr), nl, nl,

write("1) "),

first_symbol_of_string(Str,Char),

write("2) "),

first_symbol_of_substring(Str,SubStr,1,Char1).

Скриншот

Рис. 1


 

А также другие работы, которые могут Вас заинтересовать

47840. Економічна сутність і методи вимірювання продуктивності 110.5 KB
  Економічна сутність і методи вимірювання продуктивності Сутність і значення продуктивності праці Розрізняють поняття продуктивність і продуктивність праці. Продуктивність - це ефективність використання ресурсів праці капіталу землі матеріалів енергії інформації під час виробництва різних товарів і надання послуг. Тому для визначення ефективності виробництва найчастіше використовують показник продуктивності праці хоча це не означає що тільки праця є джерелом продуктивності. Продуктивність праці відбиває ступінь ефективності...
47842. Лекции по электробезопасности 247.5 KB
  Длительность протекания тока (ожоги тканей тела, нагрев внутренних органов, изменение состава крови, нарушение функций центральной нервной системы, вероятность совпадения времени протекания электрического тока с фазой Т кардиоцикла)
47843. Философия. Основы философского учения 948.5 KB
  Мировоззрение его структура и основные типы Мировоззрение это система обобщенных взглядов на мир на место в нем человека и его отношение к этому миру а также основанные на этих взглядах убеждения чувства и идеалы определяющие жизненную позицию человека принципы его поведения и ценностные ориентации. Убеждения не особый вид знаний а их состояние качественная характеристика Мировоззрение включает настроения чувства переживиния составляющие его эмоциональнопсихологическую сторону и оказывающие существенное влияние на...
47844. Финансы. Учебное пособие 519 KB
  В учебном пособии представлен первый раздел Финансы где рассматриваются основные вопросы сущность и функции финансов финансовая политика финансовая система и ее звенья управление финансами организация финансового контроля. Особое внимание уделяется изучению государственных и местных финансов: бюджетное устройство РФ государственный кредит и внебюджетные фонды. Финансы выступают неотъемлемой частью рыночных отношений и одновременно важным инструментом реализации финансовой политики государства. Целью учебного...
47845. Финансы железнодорожного транспорта 95 KB
  Сущность финансов железнодорожного транспорта Централизация управления финансами на железнодорожном транспорте ВВЕДЕНИЕ Транспортный комплекс состоит из большого количества взаимосвязанных отраслей и представляет собой особую транспортную отрасль производства обладающую общностью законов развития однородностью производственных процессов и назначением создаваемой продукции. Поэтому стратегия развития транспорта должна строиться с учетом неразрывности двух его функций: как поставщика услуг необходимых для развития экономики так и...
47846. ЗАКОН ХАРДИ-ВАЙНБЕРГА 622 KB
  ЧАСТОТА ГЕНА А и а рассматриваемые аллели N количество диплоидных особей 2N количество генов D количество особей с доминантными аллелями АА Н количество гетерозиготных особей Аа R количество рецессивных особей аа D H R = N D H R структура популяции D H R доля или частота гена доля или частота гена а СЛУЧАЙНОЕ СКРЕЩИВАНИЕ структура популяции частота скрещиваний УСТАНОВЛЕНИЕ РАВНОВЕСИЯ формула теоретической популяции ; экспериментальная популяция
47847. Аспекты информатизации в цивилизации 817.5 KB
  Дробные числа переводятся аналогично но деление на группы проводится двигаясь вправо от десятичной точки и записывая недостающие нули являющиеся значащими. На каждом шаге деления получают цифры числа в системе S начиная с младшей. Отдельно для целой и дробной части числа в произвольной системе счисления.
47848. ПРИКЛАДНІ АСПЕКТИ ЗДІЙСНЕННЯ ІНВЕСТУВАННЯ В ЛЮДСЬКИЙ ПОТЕНЦІАЛ ТОВ «КРИЖАНА ФУДС» 413.77 KB
  Метою випускної кваліфікаційної роботи є розкриття теоретичних та практичних аспектів формування та функціонування ефективного інвестиційного поля для матеріальних та психологічних вкладень в людський капітал, а також визначення напрямів покращення його функціонування у ТОВ »Крижана Фудс».