50873

Работа с файлами, строками и списками

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

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

Задан список списков. Необходимо указать в каких словах есть шипящие буквы. Результат сохранить в файле.

Русский

2014-01-31

64.5 KB

1 чел.

МИНИСТЕРСТВО ОБРАЗОВАНИЯ, НАУКИ, МОЛОДЕЖИ И СПОРТА УКРАИНЫ

ОДЕССКИЙ НАЦИОНАЛЬНЫЙ МОРСКОЙ УНИВЕРСИТЕТ

Кафедра «Информационные технологии»

Отчёт о выполнении лабораторной работы №7

 

«Работа с файлами, строками и списками»

Выполнил:

Студент КСФ 4 к. 4 гр.

Мельников В.Е.

Проверил:

Бодарев А.Д.

Одесса 2013

Задание к работе

Задан список списков. Необходимо указать в каких словах есть шипящие буквы. Результат сохранить в файле.

Листинг

domains

 file = f1

 object = string*

 list = object*

predicates

nondeterm analiz_string(string,integer,integer)

nondeterm glasn_bukva(char)

nondeterm videlenie_stroki(object,object)

nondeterm videlenie_spiska(list,object,object)

append(object,object,object)

save_file(object)

nondeterm start

clauses

     glasn_bukva('ш').

glasn_bukva('щ').

glasn_bukva('ч').

glasn_bukva('х').

 

analiz_string("",0,0).

analiz_string(S,Glas,Sogl) if

  frontchar(S,X,Y),

  glasn_bukva(X),  

  analiz_string(Y,Glasn,Sogl),

  Glas=Glasn+1.

  

analiz_string(S,Glas,Sogl) if

  frontchar(S,X,Y),

  not(glasn_bukva(X)),

  analiz_string(Y,Glas,Sogln),

  Sogl = Sogln+1.

videlenie_stroki([],[]).

videlenie_stroki([X|L],L2) if

  analiz_string(X,G,S),

  G>0,

  write(X,"- есть шипящие\n"),

  videlenie_stroki(L,L1),

  L2 = [X|L1].

     videlenie_stroki([X|L],L1) if

  analiz_string(X,G,S),

  G<=0,

  write(X," - нет шипящих, ","\n"),

  videlenie_stroki(L,L1).

 

append([],L,L).

append([X|L1],L2,[X|Lr]) if

  append(L1,L2,Lr).

 

 

videlenie_spiska([],L,L).

videlenie_spiska([X|L],L1,Rez) if

  videlenie_stroki(X,Spis),

  append(L1,Spis,L2),

  videlenie_spiska(L,L2,Rez).

 save_file(Rez) if

  openwrite(f1,"rezult.txt"),

  writedevice(f1),

  write("Список слов, в которых согласных больше гласных\n"),

  write(Rez),

  closefile(f1).

 

start if

 write("Задан список списков. Из него следует сформировать новый список,\n"),

 write("элементами которого будут слова исходного списка, в которых согласных\n"),

 write("больше гласных. Результат сохранить в файле.\n\n"),  

 write("Список списков строкового типа:\n"),

  readchar(_),

 List = [["проща","земля","пуща","особняк"],["шипилявый","шапошник","чижик-пыжик"],["парабола","штангенциркуль"]],

 write(List,"\n\n"),

 readchar(_),

 videlenie_spiska(List,[],Rez),

 %write("\nСписок из слов, в которых согласных больше гласных:\n"),

 %write(Rez,"\n\n"),

 save_file(Rez),

 write("Результат сохранен в файле rezult.txt\n"),

 readchar(_).

goal

start.

Выполнение программы


 

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

25421. Модели разрешения конфликтов в процессе с/р 17.72 KB
  Предпосылки решения ков: 1 достаточная зрелость кта к ая выражается в видимых формах проявления объявлении своих или противоположных интересов и позиций в организации конфликтных групп; 2 потребность субъектов разрешать кты и способность это осуществить; 3 наличие необходимых средств и ресурсов для разрешения ктов: матерх политич культурных человечх. Выделяют 5 оснх стратегий поведения в конфх ситуациях: а приспособление субъект не проявляет ни активности ни заинтересованности в достижении х результатов. Она направлена...
25422. Методы исследования в области СР 15.92 KB
  Всю совокупность методов используемых в СР можно классифицировать на 2 большие группы: теоретические и практические. К теоретическим методам СР следует отнести общенаучные методы: индукция заключение осуществляется от фактов к гипотезе и к общему утверждению; дедукция заключение от общих утверждений к частным фактам; синтез соединение элементов в единое целое; аналогия умозаключение при котором 3 об изученном объекте переносятся на сходный менее изученный; сравнение метод позволяющий установить сходство...
25423. Методы исследования в социальной статистике 14.9 KB
  Задачами для СоцС явся: систематический анализ ситуации в соц сфере; анализ важнейших тенденций и закономерностей развития отраслей соц инфрастрры; изучение уровня и условий жизни нася; оценка степени дифференциации этих характеристик; анализ динамики; прогнозирование наиболее вероятного хода развития на ближайшую и более отдаленную перспективу; исследование факторов под влиянием к х сложилась данная ситуация; выяснение соотношений объективных и субъективных факторов. Разработка подходов к построению обобщающих показателей позволяющих...
25424. Семья и ее основные функции. Социально-экономические, духовно-культурные, психолого-педагогические основания современной семьи 47.5 KB
  Социальноэкономические духовнокультурные психологопедагогические основания современной семьи. Структура ответа: Вступление Понятие семьи Основные функции семьи Вывод Общеизвестно что семья является уникальным социальным созданием человечества.1 Интегральными характеристиками семьи которые во многом определяют ее потенциалы считаются: психологическое здоровье функциональноролевая согласованность социальноролевая адекватность эмоциональная удовлетворенность адаптивность в микросоциальных отношениях устремленность на семейное...
25425. Основные направления и технологии социальной работы с семьей 50.5 KB
  Сегодня многие семьи нуждаются в помощи и поддержке для того чтобы полноценно реализовывать предписываемые обществом функции. В такой помощи нуждаются неполные и многодетные семьи семьи одиноких матерей военнослужащих семьи воспитывающие детей с ограниченными возможностями усыновленных и опекаемых детей имеющие родителейинвалидов студенческие семьи семьи беженцев мигрантов безработных асоциальные семьи и др. Исходя их этого социальный работник призван выполнять следующие функции: диагностическую изучение особенностей семьи...
25426. Проблемы социальной защиты семьи, материнства и детства в России 18.19 KB
  В Конституции РФ сказано что в Российской Федерацииобеспечивается государственная поддержка семьи материнства отцовства и детстваразвивается система социальных служб устанавливаются государственные пенсии пособия и иные гарантии социальной защиты. Основными принципами социальной работы с семьей являются: Приоритет прав и интересов ребенка всесторонней развитие и уважение его человеческого достоинства; Уважение прав родителей объективная и компетентная оценка ситуации в семье со стороны социальных служб; Соблюдение конфиденциальности...
25427. Государственная семейная политика и механизм ее реализации 17.26 KB
  Государственная семейная политика это целостная система принципов оценок и мер организационного экономического правового научного информационного пропагандирующего и кадрового характера направленная на улучшение условий и повышение качества жизни семьи. Цель ГСП обеспечение государством необходимых условий для реализации семьей ее функций и повышения качества жизни семьи. была принята концепция ГСП в России необходимость семейной политики определилась теми неблагоприятными последствиями в изменении структуры и функций семьи...
25428. Гендерные аспекты социальной работы 68 KB
  анализу социальной ситуации клиента социальной службы изысканию ресурсов и технологий оказания помощи клиенту в зависимости от его принадлежности к мужскому или женскому полу. Доминанты пола играют определенную роль для выбора стратегий поддерживающей терапии клиента. Проблемы мужчиныклиента в контексте брачносемейных отношений и психосексуальных конфликтов являются важной составной частью социальной работы. Таким образом полоролевые особенности клиента вызывают ряд специфических проблем которые имеют свою функциональную...
25429. Женщины – один из наиболее значимых объектов социальной работы 47.5 KB
  Женщины составляют большинство населения в России где их доля равна 531 881 мужчина на 1000 женщин. Для возрастной структуры России гендерный аспект имеет особое значение: среди жителей страны в возрасте 60 лет и старше доля женщин составляет более 65 диспропорция мужского и женского населения что ведет к женскому одиночеству. Исследованием положения женщин вплотную заняты 2 науки: гендерология и феминология. Предмет гендерологиисоциальные статусы женщины и мужчины определяющие определенный характер их взаимодействия и...