Разработка информационной системы



План:

 

Введение 

  1. Постановка задачи
  2. Информационные системы
    1. Информационно-поисковые системы
    2. Информационно-справочные системы
  3. Описание программы
    1. Язык программирования Паскаль
    2. Модуль Graph
    3. Модуль Crt

Заключение

Список литературы

Приложение 1

Приложение 2

 

Введение

 

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

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

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

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

Информатика - это наука, которая изучает структуру  и особенность информации, а также вопросы, связанные со  сбором, хранением и переработкой информации.

Система  программирования  Турбо  Паскаль, разработанная  американской корпорацией  Borland,  остается  одной  из  самых  популярных  систем  программирования  в  мире,  которой  по  плечу  любые  задачи от  создания  простых  программ,  предназначенных  для  решения несложных  вычислительных   задач,  до  разработки  сложнейших  реляционных  систем управления  базами  данных.

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

Версия языка TURBO PASCAL V 7.0. включает в себя возможности:

- использование отдельно компилируемых модулей;

- интегрированный отладчик;

- интегрированная среда разработчика;

- объектно-ориентированную оболочку для создания  прикладных программ.

Турбо Паскаль 7.0 оперирует  объектами, присущими типичной ЭВМ: символами, целыми числами и числами  с плавающей запятой. Программисту разрешено управлять размещением  объектов и использовать в программах знания размера объектов и способов их взаимного расположения.

Модули представляют  собой  прекрасный  инструмент для  разработки  библиотек прикладных  программ   и   мощное средство    модельного    программирования.

 

 

 

  1. Постановка задачи

 

Цель курсовой работы: Разработать информационно-поисковую  систему для справочного бюро ж/д вокзала. Для разработки информационно-поисковой системы используется  язык  программирования Паскаль версии 7.0

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

Разработка информационной системы состоит из следующих этапов:

1.Определение содержания  файла информации.

2.Определение функций  информационно-поисковой системы.

3.Разработка блок-схемы приложения.

4.Разработка приложения (листинг программы).

Файл информации и  приложение образуют информационно-поисковую  систему.

Содержание файла информации:

- станция;

- номер рейса;

- время отправления  (ч.м.);

- цена билета.

Функции информационно-поисковой системы:

- поиск рейсов (по станции,  по времени отправления (ч.м.)).

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

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

 

  1. Информационные системы

 

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

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

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

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

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

 

    1. Информационно-поисковые системы

 

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

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

Релевантность - это соответствие результатов поиска сформулированному запросу.

 

    1. Информационно-справочные системы

 

Информационно-справочные системы предназначены для управления различными информационными и справочными  массивами, в число которых входят и базы данных. Эти системы организовывают определенный интерфейс пользователя с функциями обработки информации самой системы.

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

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

 

 

 

 

  1. Описание программы

 

Для разработки информационно-поисковой  системы используется  язык  программирования Паскаль версии 7.0.

При написании данной курсовой работы, используются два дополнительных модуля: Graph и Crt.

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

В   модулях Turbo   PASCAL   явным   образом выделяется  некоторая "видимая" интерфейсная часть, в которой сконцентрированы описания  глобальных  типов,  констант  и  переменных,  а  также   приводятся   заголовки   глобальных   процедур  и функций. Появление объектов  в интерфейсной части  делает их доступными  для других  модулей и основной программы. Тела  процедур  и  функций  располагаются  в  исполняемой части модуля, которая может быть скрыта от  пользователя.

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

 

 

 

    1. Язык программирования Паскаль

 

Язык программирования Pascal (назван в честь выдающегося французского математика и философа Блеза Паскаля (1623 - 1662)), разработан в 1968–1971 гг. Никлаусом Виртом, профессором, директором Института информатики Швейцарской высшей политехнической школы. Язык Pascal, созданный первоначально для обучения программированию как систематической дисциплине, скоро стал широко использоваться для разработки программных средств в профессиональном программировании.

Широкой популярности Pascal среди программистов способствовали следующие причины: благодаря своей компактности, удачному первоначальному описанию Pascal оказался достаточно легким для обучения; язык программирования Pascal отражает фундаментальные и наиболее важные концепции (идеи) алгоритмов в очевидной и легко воспринимаемой форме, что предоставляет программисту средства, помогающие проектировать программы; язык Pascal позволяет четко реализовывать идеи структурного проектирования и структурной организации данных; язык Pascal сыграл большую роль в развитии методов аналитического доказательства правильности программ и позволил реально перейти от методов отладки программ к системам автоматической проверки правильности программ; применение языка Pascal значительно подняло «планку» надежности разрабатываемых программ за счет требований Pascal к описанию используемых в программе переменных, проверки согласованности программы при компиляции без ее выполнения; использование в Pascal простых и гибких структур управления: ветвлений циклов.

Для повышения качества и скорости разработки программ в  середине 80-х гг. была создана система  программирования Turbo Pascal. Слово Турбо в названии системы программирования – это отражение торговой марки фирмы-разработчика Borland International, Inc. (США). В 1992 году фирма Borland International выпустила два пакета программирования на использовании языка Паскаль, - Borland Pascal 7.0 и Turbo Pascal 7.0.

 

3.2. Модуль Graph

 

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

Настройка графических  процедур с конкретным адаптером  достигается за счет подключения соответствующего графического драйвера.

Драйвер – специальная программа, осуществляющая управление соответствующими техническими средствами компьютера.

Для поддержки  технических средств компьютера используются следующие драйверы:

  • CGA.BGI — драйвер для CGA, MCGA (BGI — Borland Graphics Interfase);
  • EGAVGA. BGI - драйвер для EGA, VGA;
  • HERC.BGI — драйвер для монохромного Hercules;
  • ATT.BGI - драйвер для АТ&Т6300 (400 строк);
  • PC3270.BG1 - драйвер для IBM 3270 PC;

• IBM8514.BGI — драйвер для IBM 8514 и др.

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

Разрешающая способность экрана (разрешение экрана) — общее количество пикселей и количество цветов (оттенков), которыми может светиться каждый из них.

Графическая страница — область оперативной памяти компьютера (карта экрана), используемая для запоминания информации о светимости (цвете) каждого пикселя.

Различают следующие  графические режимы работы для каждого типа адаптеров.

Адаптер CGA эмулирует пять графических режимов, среди них режимы низкого разрешения экрана — 320x200 пикселей:

палитра 0: светло-зеленый, розовый, желтый + черный,

палитра 1: светло-голубой, светло-фиолетовый, белый + черный,

палитра 2: зеленый, красный, коричневый + черный,

палитра 3: голубой, фиолетовый, светло-серый + черный;

и высокого разрешения экрана — 640x200 при использовании  двух цветов, причем один из них всегда черный.

Графический адаптер CGA использует одну страницу.

Адаптер EGA эмулирует графические режимы CGA и режимы низкого разрешения: 6400x200, 16 цветов, 4 страницы; высокого разрешения: 640x350, 16 цветов, 1 страница.

Адаптер VGA эмулирует режимы адаптеров CGA, EGA и режим высокого разрешения: 640x480, 16 цветов, 1 страница.

Адаптер SVGA эмулирует режим адаптера VGA, достигая режима разрешения 1024x768, 256 цветов (оттенков).


Для модуля Graph определены следующие процедуры и функции.

Управление  графическим режимом

Процедура InitGraph — инициирует графический режим работы адаптера.

Формат:

InitGraph (Driver,Mode,’’);

Var

   Driver, Mode: Integer;

   s,m: String;.

Переменные:

Driver — тип графического драйвера: Const. Диапазон значений:

Detect = 0; {Режим автоопределения типа драйвера}

CGA=1;

MCGA = 2;

EGA = 3;

VGA = 9;.

Mode — режим работы графического адаптера. Значения Mode для EGA:

Const

EGALo = 0;      {640x200, 16 цветов}

EGAHi=l;      {640x350, 16 цветов}

EGAMonoHi = 3;       {640x350, 2 цвета}

для VGA:

Const

VGALo = 0;      {640x200}

VGAMed= 1;   {640x350}

VGAHi = 2;      {640x480}

Процедура SetGraphMode — устанавливает новый режим работы адаптера.

Формат: SetGraphMode (Mode: Integer);.

Mode — код устанавливаемого режима.

 

При неопределенном значении Mode режим работы драйвера определяется максимальным значением константы Mode.

 

Процедура CloseGraph — восстанавливает текстовый режим работы экрана.

Формат: CloseGraph;.

Функция GraphResuIt — записывает результат обращения к графическим процедурам. Значение GraphResuIt = 0, если обращение успешно, иначе — отрицательное число — код ошибки. Например:

GraphResuIt = - 1 означает, что не инициирован графический режим;

GraphResuIt = - 2 означает, что не определен тип драйвера;

GraphResuIt = - 14 — неправильный номер шрифта.

Наиболее частая ошибка — неправильно определено место расположения файла GRAPH.TPU, чтобы избежать ошибки, необходимо: в Турбо-среде в диалоговом окне Options/Directories в поле Unit Directories указать каталог, в котором расположен этот файл.

После обращения  к функции GraphResuIt признак ошибки сбрасывается, и повторное обращение к ней вернет ноль.

Функция GraphErrorMsg — дает текстовое сообщение коду ошибки.

Формат: GraphErrorMsg (Code: Integer): String.

Code — код ошибки, возвращаемый функцией GraphResuIt.

 

Управление  цветом и палитрой

 

Процедура SetColor — устанавливает текущий цвет линий и символов.

Формат: SetColor (Color: Word);

Color — цвет линий и символов

 

В модуле Graph используются константы для задания цвета модуля СП.

 

Процедура SetBkColor — устанавливает цвет фона экрана.

Формат: SetBkColor(Color: Word);

Color — цвет фона экрана.

 

Color — цвет заполнения.

Процедура Rectangle — вычерчивает прямоугольник с указанными координатами углов.

Формат: Rectangle (xl,yl,x2,y2: Integer);.

Прямоугольник вычерчивается  с использованием текущего цвета и текущего стиля линий.

 

Используется  текущий стиль линий SetLineStyle, текущий цвет SetColor, передняя грань заливается текущим стилем заполнения SetFillStyle.

Работа с  линиями

Процедура Line — изображает линию между указанными координатами начала и конца.

Формат: Line(Xl,Yl,X2,Y2: Integer);

XI, Yl — координаты начала линии;

Х2, Y2 — координаты конца линии.

 

В процедурах Line, LineTo, LineRel линии вычерчиваются текущим стилем и текущим цветом.

 

Процедура SetlineStyle — устанавливает новый стиль вычерчивания линий.

Формат: SetLineStyle(Type,Pattern,Thick: Word);.

Type — тип линии, определяется константой из следующего ряда:

Const

SolidLn = 0; {Сплошная линия}

DottedLn = 1; {Точечная линия}

CenterLn = 2; {Штрих-пунктирная линия}

DashedLn = 3; {Пунктирная линия}

UserBitLn = 4. {Узор линии определяет пользователь}.

Pattern — образец линии: состоит из двух байтов, каждый бит которых соответствует светящемуся пикселю в линии (16 пикселей); этот отрезок повторяется по всей длине линии. Pattern указывается только для линий, вид которых определяет пользователь (например, для Туре = UserBitLn).

Thick — толщина линии, параметр может принимать два значения:

Const

NormWidth = 1; {Толщина в один пиксель}

ThickWidth = 3. {Толщина в три пикселя}.

 

Построение криволинейных фигур

 

Процедура Ellipse — изображает эллипсную дугу. Формат: Ellipse(X,Y: Integer; BegA,EndA,RX,RY: Word);. X, Y — координаты центра;

BegA, EndA — начальный и конечный углы дуги;

RX, RY — горизонтальный и вертикальный радиусы эллипса в пикселях.

Процедура Arc — изображает дугу окружности. Формат: Arc(X,Y: Integer; BegA,EndA,R: Word);.

X, Y — координаты центра;

BegA, EndA — начальный и конечный углы дуги;

R — радиус.

 

Углы отсчитываются против часовой стрелки! Нулевой угол      
соответствует горизонтальному вектору слева направо.

 

Процедура Circle — вычерчивает окружность.

Формат: Circle(X,Y: Integer; R: Word);.

X, Y — координаты центра;

R — радиус в пикселях в горизонтальном положении.

 

Окружность  выводится текущим цветом, толщина линий – текущим стилем, вид линии — всегда SolidLn (сплошная).

 

Работа  с текстом

 

Процедура OutText — выводит текстовую строку, начиная с текущего положения указателя.

Формат: OutText(Txt: String);.

Txt — выводимая строка.

Процедура OutTextXY — выводит строку, начиная с заданного места.

Формат: OutTextXY(X,Y: Integer; Txt: String);.

X, Y — координаты точки вывода;

Txt — выводимая строка.

Процедура SetTextStyle — устанавливает стиль текстового вывода на графический экран.

Формат: SetTextStyle(Font,Direct,Size: Word);.

Font — код (номер) шрифта, определяется константой из следующего ряда:

Const

DefaultFont = 0; {Точечный шрифт 8x8}

TriplexFont = 1; {Утроенный шрифт TRIP.CHR]

SmallFont = 2; {Уменьшенный шрифт LITT.CHR)

SansSerifFont = 3; {Прямой шрифт SANS.CHR)

GothicFont = 4. {Готический шрифт GOTH.CHR)

Direct — код направления, определяется константой 0 или 1:

Const

HorizDir = 0; {Слева направо}

VertDir = 1. {Снизу вверх}

Size — код размера шрифта, выбирается из диапазона (1..10), минимально различимый шрифт соответствует коду 4.

 

 

3.3.  Модуль Crt

 

Модуль Crt обеспечивает управление текстовым режимом работы экрана: перемещает курсор по экрану, изменяет цвет фона (экрана) и символов (знаков на экране), создает окна, управление звуком и др.

Его назначение — создание и обновление различного рода окон, меню и других атрибутов диалоговых программ. Модуль состоит из подпрограмм, оформленных в виде библиотеки (модуля).

Модуль Crt выполняет различные процедуры и функции.

 

Процедура ClrScr — очищает экран или окно: экран заполняется цветом фона, а курсор устанавливается в верхний левый угол экрана или окна.

 

Процедура TextColor — определяет цвет выводимых символов.

Формат: TextColor(Color); Color: Byte.

 

Процедура Text Background — определяет цвет фона.

Формат: TextBackground(Color); Color: Byte.

 

Окраска фона осуществляется после  использования процедуры очистки экрана ClrScr!

 

После восстановления исходного цветазнаков  на экране компьютера необходимо обратиться к процедуре Write/Writeln, так как только в этом случае в специальную переменную TextAttr модуля Crt заносятся цветовые определения!

 

Для установки  цвета можно использовать соответствующие коды — константы цветов (табл. 1).

 

Таблица 1

Константы модуля Crt

 

 

Const

Константы цветов

Описание  цвета

Black

Blue

Green

Cyan

Red

Magenta

Brown

LightGray

DarkGray

LightBlue

LightGreen

LightCyan

LightRed

LightMagenta

Yellow

White

Blink

= 0

= 1

= 2

= 3

= 4

= 5

= 6

= 7

= 8

= 9

= 10

= 11

= 12

= 13

= 14

= 15

= 128

Черный

Синий

Зеленый

Голубой

Красный

Фиолетовый

Коричневый

Светло-серый

Темно-серый

Светло-синий

Светло-зеленый

Светло-голубой

Розовый

Светло-фиолетовый

Желтый

Белый

Мерцание символа


 

 

Процедура TextMode – задает соответствующий текстовый режим работы адаптера.

 

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

 

Формат: TextMode(Mode); Mode: Word,

Где Mode – код текстового режима:

Таблица 2

BW40

Co40

BW80

Co80

Mono

Font8x8

= 0

= 1

= 2

= 3

= 7

= 256

Черно-белый режим 40х25

Цветной режим 40х25

Черно-белый режим 80х25

Цветной режим 80х25

Используется с MDA

Используется для загружаемого шрифта в режиме 80х43 или 80х50


  

Процедура GotoXY – переводит курсор в нужное место экрана или текущего окна.

Формат: GotoXY(X,Y); X,Y:Byte;

где X,Y – новые координаты курсора.

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

Формат: Delay(t); t:Word;.

Например: Delay(10000);.

Функция ReadKey – возвращает значение символа клавиатуры (Char); форма записи a:=ReadKey;.

 

Ввод  символа с помощью этой функции не сопровождается эхо-повтором.

 

Каждому символу клавиши  клавиатуры в компьютере ставится в  соответствие определенный код, состоящий  из дополнительной цифры. Такой код  определяется как расширенный код  клавиши.

Расширенный код клавиш - #0+ код клавиши символа (ASCII): к ним относятся клавиши <F1> - <F10>?, <Ins>, <Home>, <Del>, <End>, <PageUp>, <PageDn>.

#0 используется для  указания программе на генерацию  расширенного кода, например: <Home> - 0 71, <PageUp> - 0 73, <PageDn> - 0 81, <Ins> - 082, …

 Функция KeyPressed – указывает состояние буфера клавиатуры:

False – буфер пуст;

True – в буфере есть хотя бы один символ, не прочитанный программой.

 

Обращение к функции KeyPressed не задерживает исполнения программы.

 

 

 

 

 

 

 

 

 

 

 

 

 

Заключение

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